vba二维数组初始化_VBA进阶 | 数组基础03: 二维数组

VBA可以定义多达60维的数组，但实际上很少使用三维以上的数组。本文主要讲解二维数组及其使用。

声明二维数组

与一维数组一样，使用Dim语句来声明二维数组。例如，语句

Dim myArray(3,7) AsInteger

声明了一个名为myArray的包含4行8列共32个元素的二维整型数组，如图1所示。

  图1

也可以使用以下语句，使myArray数组的下标索引值从1开始。

Dim Arr(1 To 4, 1 To8) As Integer

声明一个4行8列的二维数组。

声明二维数组的方式

① Dim数组名(数字,数字) As数据类型

② Dim数组名(数字,数字)

各部分的说明与上篇文章相同。(注，谢谢doubao朋友在上篇文章中指出的歧义；数组名后的数字定义了数组最大下标索引值，这个数字可能该维的最大元素数，这取决于Option Base语句)

给二维数组赋值

下面的过程给二维数组myArray赋值：

Sub testMyArray()

Dim myArray(3, 7) As Integer

Dim i As Integer, j As Integer

For i = 0 To 3

For j = 0 To 7

myArray(i, j) = i * j

Next j</