拆分字符串 - 基於符號的Vba

Question

我有一個像ABC$3$FG$H這樣的字符串，我想將它們分成4個不同的字符串。

string1 - ABC, Number-3, string3-FG, String4 - H.

我在實際的字符串中用$符號分割字符串。

Answer 1

Split(String1,"$")

足夠了。 返回包含指定數量子字符串的從零開始的一維數組。

如果您想查看拆分字符串，這是一個可能的解決方案：

Public Sub TestMe()

    Dim str     As String
    Dim cnt     As Long

    str = "ABC$3$FG$H"
    For cnt = LBound(Split(str, "$")) To UBound(Split(str, "$"))
        Debug.Print Split(str, "$")(cnt)
    Next cnt

End Sub

拆分的MSDN文檔 。