Splitte tekst plus tælle karakterer

Jeg har i Excel brug for at formattere en del af en celle som en skrifttype og en anden som en anden skrifttype.
Det klarer jeg med koden her:
'*******************************************
    With xlsheet.Cells(j, i + 2).Characters(Start:=1, Length:=9).Font
        .Name = "Code 128AB"
        .FontStyle = "Fed"
        .Size = 36
    End With
    With xlsheet.Cells(j, i + 2).Characters(Start:=10, Length:=5).Font
        .Name = "Verdana"
        .FontStyle = "Fed"
        .Size = 10
    End With
    xlsheet.Rows(RækkeNummer).RowHeight = 45
'*******************************************
(koden afvikles i Access)

Problemet er nu bare at antallet af karakterer ikke er konstant og det havde været rart med et variable i stedet for.

Eksempel på værdier i cellen:
{RF1487ä~ RF1487
{RD585m~ RD585

Gældende for alle mulige værdier er, at de er adskilt i en venstre og højre sektion, separeret af et mellemrum.

Værdien i cellen kommer selvfølgelig fra en variabel fra Access
Hvordan finder jeg ud af hvor mange tegn der er til venstre hhv. til højre for mellemrummet?