根据符号拆分string – VBA

我有一个这样的stringABC$3$FG$H ，我想把它们分成4个不同的string。

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

我用实际string中的$符号分割string。

Answer 1

 Split(String1,"$") 

足够了。 返回包含指定数量的子string的从零开始的一维数组。

如果你想查看拆分的string，这是一个可能的解决scheme：

 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 

Split的MSDN文档 。