Vba 拆分由“分隔”分隔的字符串时出错&引用；运行时错误'；13'；：类型不匹配。如何解决这个问题？

现在，在运行代码时，会弹出一条错误消息

---

“运行时错误'13'：类型不匹配”

修复了这样的代码

Private Sub subst()

Dim temp1 As String
temp1 = "Test,test,TEst"
Dim i As Integer
i=0
Dim temp(3) As String
For i=0 To 2
   temp(i) = Split(temp1,",")
Next i

正如我在评论中所说，你可以为初学者和其他读者找到关于宏观掌握的非常好的阅读材料

---

已返回一个数组。好的，我将该数组存储到另一个数组中。temp（3）也是一个字符串数组。但是，由于

字符串

不是数组，所以会出现类型不匹配。那么，在这种情况下，我应该写什么呢？

将temp作为变量设置为Dim

，然后

temp=Split（temp1，“，”

）。

Private Sub Subst()

    Dim temp1 As String
    temp1 = "Test,test,TEst"
    Dim i As Long

    Dim temp As Variant
    temp = Split(temp1, ",")

    For i = LBound(temp) To UBound(temp)
        Debug.Print temp(i)
    Next i

End Sub