基于符号拆分字符串- Vba

Question

我有一个类似于这个ABC$3$FG$H的字符串，我想把它们分成四个不同的字符串。

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文档。