EXCEL VBA中给数组赋值的一个小问题

2024-11-04 16:05:24

推荐回答（2个）

回答1：

VBA数组赋值方式：

字符串数组的定义：

Dim arr(1 to 3) as string

如此定义，但是不能直接给数组赋值
如果想直接给数组直接赋值，需要如下操作：

Dim arr() as Variant

arr=Array("a","b","c")
赋值格式：

例如，给变量a赋值一个数为12，则格式为：a = 12 [注意：变量（即a）只能是一字母，而赋予的值可以是一个式子，当它是式子时，a的值就是这个式子的结果。

回答2：

很简单的，你只距成功差一点
Dim ma
ma = Array(37, 11, 3, 0, 1, 5, 31, 10, 35, 16)
MsgBox ma(0)
这样试试看！！！

EXCEL VBA中 给数组赋值的一个小问题