2016-06-03 12 views
2

Ich versuche, die letzten zwei Wörter einer Zeichenfolge in VBA zu extrahieren.Extrahiere die letzten zwei Wörter einer Zeichenfolge in VBA

kann mir bitte jemand helfen?

vielen dank!

+0

Sie müssen einige Beispiele für die Zeichenfolge, und einige Beispiel-Code von dem, was Sie bereits –

+0

letzten zwei Wörter oder Zeichen versucht haben, liefern? wenn Worte, Split() ist der Weg zu gehen, aber wo sind sie zurück? Wenn Zeichen, verwenden Sie Right() -Funktion ('myLastTwoCharacters = Right (string, 2)') – user3598756

+1

die Zeichenfolge ein Satz wie: Ich habe viele Äpfel. ich möchte ein lastwords = "viele Äpfel" erhalten, so dass ich eine msgbox (Lastwords) vielen dank – Canthagar

Antwort

6

Bedenken Sie:

Sub LastTwoWords() 
    Dim s As String 

    s = "Now is the time for all good men to come to the aid of the party" 
    ary = Split(s, " ") 
    MsgBox ary(UBound(ary) - 1) 
    MsgBox ary(UBound(ary)) 
End Sub 
+0

Hab noch nie diesen "falschen" Satz gehört, immer Lorem Ipsum benutzt ... jetzt habe ich einen neuen zu benutzen. Auch, nette Verwendung von Array. – BruceWayne

+0

@BruceWayne ..................... Mein Satz wurde verwendet, um Tippen zu lehren. –

+1

Ich habe noch nie davon gehört, ist alles, was ich meinte ... Ich habe gehört "der faule braune Fuchs springt über den faulen Hund", und für "gefälschten Text", Lorem Ipsum ... einfach schön zu sehen ein weiterer "Lehrsatz". (Für mich sowieso, ich bezweifle, dass sonst jemand mag solche Dinge zu lernen: P) – BruceWayne

Verwandte Themen