WPSVBA运行时错误9怎么办：

1、VBA出现错误9的时候，首先点击调试，查看问题。

3、根据验证得到解决方法：

将t=0更改为t=1，由于arr数组的dimmension从1开始（ ReDim arr(1 To UBound(aryValues)) ）：

t = 1

For i = LBound(aryValues) + 1 To UBound(aryValues)

For Each v In dict.Keys

If v = aryMembers(i) And c = 0 Then

arr(t) = aryValues(i)

c = c + 1

t = t + 1

End If

Next

c = 0

Next