VBA Split函數

Split 函數

Split 函數返回一個包含分割符的基礎上進行分隔特定數量的數組。

語法 :

Split(expression[,delimiter[,count[,compare]]])

  1. expression, 必需的參數。該字符串表達式,可以包含分隔符的字符串。

  2. delimiter, 一個可選的參數。參數用於轉換成基於定界符數組。

  3. count, 一個可選的參數。要返回子串的數目,並且如果指定爲-1,那麼所有的子串被返回。

  4. compare, 一個可選的參數。此參數指定要使用哪個比較方法。

    • 0 = vbBinaryCompare - 執行二進制比較

    • 1 = vbTextCompare - 執行文本比較

例如:

添加一個按鈕,並添加以下功能

Private Sub Constant_demo_Click() ' Splitting based on delimiter comma '$'
Dim a as Variant
Dim b as Variant
a=Split("Red $ Blue $ Yellow","$")
b=ubound(a)
For i=0 to b
msgbox("The value of array in " & i & " is :" & a(i))
Next
End Sub

當執行函數輸出如下所示:

The value of array in 0 is :Red
The value of array in 1 is : Blue
The value of array in 2 is : Yellow