Wie das erste Wort aus einer Zeichenfolge in VBA (Excel) extrahieren?

Question

Zum Beispiel, wenn ich hatte:

Sub TestModule() 
    Dim test As String 
    test = "Machine Head" 
End Sub 

Wie würde ich das Wort Maschine extrahieren und weisen Sie auf eine Variable? Ich habe versucht, mit den Funktionen Suchen und Links, hatte aber nicht viel Erfolg.

Prost!

Answer 1

Verwenden Split():

Sub TestModule() 
    Dim test As String 
    dim frstWrd as string 
    test = "Machine Head" 
    frstWrd = split(test," ")(0) 
    Debug.Print frstWrd 
End Sub