在VBA中提取字符串的最后两个单词

Question

我试图在vba中提取字符串的最后两个单词.

请问有人可以帮助我吗？

非常感谢!

Answer 1

考虑:

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