VBA中 Array 函数

Array 函数用于创建一个包含多个元素的数组

语法

Array(arg1, arg2, ...)

参数说明：
(arg1,arg2, ...)：这些是要在数组中包含的元素。可以包括任何数据类型的元素，例如数字、文本、日期等。

用法说明

创建数组：
使用Array函数可以轻松地创建一个数组，只需将要包含的元素作为参数传递给函数即可。

示例：

Sub aa()
    Dim myArray As Variant
    myArray = Array(1, 2, 3, 4, 5)
End Sub

 这将创建一个包含5个整数的数组。

多维数组：
Array函数也可以用于创建多维数组。只需在参数中嵌套多个Array函数即可。

示例：创建一个2x3的二维数组

Sub aa()
    Dim myArray As Variant
    myArray = Array(Array(1, 2, 3), Array(4, 5, 6))
End Sub

访问数组元素：
可以使用索引来访问数组中的元素。在VBA中，数组的索引从0开始。

示例：要访问上面创建的数组中的第四个元素，可以这样

Sub aa()
    Dim element As Variant
    Dim myArray As Variant
    myArray = Array(1, 2, 3, 4, 5)
    element = myArray(3) ' 这将获取数组中的第四个元素，即数字4
End Sub

动态数组：
使用Array函数创建的数组是静态的，其大小在创建时就确定了。如果需要创建动态数组，可以使用ReDim语句重新调整数组的大小。

示例：

Sub aa()
    Dim myArray() As Variant
    ReDim myArray(1 To 3) ' 数组的索引从1开始，创建一个初始大小为3的动态数组
    myArray(1) = "Apple"
    myArray(2) = "Banana"
    myArray(3) = "Cherry"
    ReDim Preserve myArray(1 To 4) ' 改变数组大小并保留已有数据
    myArray(4) = "Date"
End Sub

总之，Array函数用于在VBA中创建数组，可以包含不同类型的元素，并且可以用于创建多维数组。一旦创建了数组，您可以使用索引访问和操作数组中的元素。如果需要更灵活的数组大小，可以使用ReDim语句来调整数组的大小。