vba - 拆分字符串 - 基于符号的 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

The MSDN documentation for Split .