函数VBA：Split

描述

VBA Split 函数用于根据分隔符分割字符串以获得值数组。

语法 Split

Split（文本，分隔符）

或者

Split（文本、分隔符、限制）

示例 VBA Split

让我们用分隔符“.”分隔站点名称“www.moonexcel.com.ua”。获取数组中的 4 个子字符串：

Sub SplitExample1()
    
     text = "www.moonexcel.com.ua"
    
     array = Split(text, ".")
    
     MsgBox array(0) '返回：www
     MsgBox array(1) '返回：moonexcel
     MsgBox array(2) '返回：com
     MsgBox array(3) '返回：ua
    
End Sub

如有必要，您可以限制数组中元素的数量：

Sub SplitExample2()
    
     text = "www.moonexcel.com.ua"
    
     array = Split(text, ".", 2)
    
     MsgBox array(0) '返回：www
     MsgBox array(1) '返回：moonexcel.com.ua
    
End Sub

如果您只需要检索单个子字符串（在本例中为中间子字符串“moonexcel”），您可以直接指定一个数组元素来检索它：

Sub SplitExample3()
    
     text = "www.moonexcel.com.ua"
    
     middle = Split(text, ".")(1)
    
     MsgBox middle '返回：moonexcel
    
End Sub