Question

VBA二维数组怎么赋值？

Answer 1

可通过 “ = ” 符号或 “ Set ” 关键字进行赋值。

变量在使用时还需要对其进行赋值。在VBA中对变量进行赋值可通过 “ = ” 符号或 “ Set ” 关键字进行。通过 “ = ” 符号对变量赋值的语法格式有以下几种。

变量名=数据

变量1=变量2 运算符 数据

变量1=变量2 运算符 变量3 … 运算符 变量n

如果在定义变量时指定了变量的数据类型，则为变量所赋的值也必须是该数据类型的值。如果变量定义为Integer类型，而在赋值时却给了变量一个String类型的数据，则在编译运行的过程中将弹出错误弹框。

扩展资料

VBA二维数组包括静态和动态数组。

静态数组是具有确定大小的数组，当事先知道数组的大小时使用静态数组。静态数组的大小是在数组的声明语句里确定的，例如，语句DimFruits(10)AsString声明了一个由10个成员组成的叫做Fruits的静态数组。

但是，万一不肯定数组会包含多少个成员，如果过程由用户输入决定，每次程序执行时，用户提供的成员数可能会变化的。

VBA会留出足够的内存来储存数组，如果声明一个需要的更多成员的数组的话，将浪费计算机资源。

这个问题的解决方法是让数组变为动态的。动态数组是大小可以改变的数组。如果数组的大小每次都由程序运行而决定的话，就使用动态数组。

参考资料来源：百度百科--VBA

Answer 2

答：二维数组赋值有两种方法， 第一种方法是单元格区域装入二维数组，如： Arr=range("a1:b19")就可以把单元格区域的值装入数组arr 第二种就是通过循环装入，一个个数值装入。例： 向二维数组写入数据和读取 Dim x As Integer, y As Integer Dim arr(1 To 5, 1 To 4) For x = 1 To 5

Answer 3

array函数只能对一维数组赋值。
定义二维数组可用 Dim和redim
赋值，如果数据有规律，可用循环，否则只能一个一个赋值