VBA中关于数组及赋值的问题
本人菜鸟一枚，为何单元格区域[A1:H1]中没有被赋上值啊？代码如下：Sub数组赋值()DimA(),B(),C(),D(),ArrA()A=[{1,2}]B=[{2,3...
本人菜鸟一枚，为何单元格区域[A1:H1]中没有被赋上值啊？代码如下：Sub 数组赋值()Dim A(), B(), C(), D(), ArrA()A = [{1,2}]B = [{2,3}]C = [{3,4}]D = [{4,5}]ArrA = Array(A, B, C, D)[A1:H1] = ArrAEnd Sub运行结果见截图
代码重新整理为：
Sub 数组赋值()
Dim A(), B(), C(), D(), ArrA()
A = [{1,2}]
B = [{2,3}]
C = [{3,4}]
D = [{4,5}]
ArrA = Array(A, B, C, D)
[A1:H1] = ArrA
End Sub 展开
代码重新整理为：
Sub 数组赋值()
Dim A(), B(), C(), D(), ArrA()
A = [{1,2}]
B = [{2,3}]
C = [{3,4}]
D = [{4,5}]
ArrA = Array(A, B, C, D)
[A1:H1] = ArrA
End Sub 展开
展开全部
VBA数组赋值方式：
字符串数组的定义：
Dim arr(1 to 3) as string
如此定义，但是不能直接给数组赋值
如果想直接给数组直接赋值，需要如下操作：
Dim arr() as Variant
arr=Array("a","b","c")
赋值格式：
例如，给变量a赋值一个数为12，则格式为：a = 12 [注意：变量（即a）只能是一字母，而赋予的值可以是一个式子，当它是式子时，a的值就是这个式子的结果。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
