小编Ade*_*den的帖子

如何在VBA中将2d数组的一维分配给新的1d数组

我需要能够创建一个newarray并将其分配给another2darray(atsomeelement)

array1(0) = 1
array1(1) = 2
Run Code Online (Sandbox Code Playgroud)

现在

array2(0) = array1
Run Code Online (Sandbox Code Playgroud)

因此

array2(0)(0) = 1
array2(0)(1) = 2
Run Code Online (Sandbox Code Playgroud)

现在我想创建一个新数组并为其分配array2的1d.

newarray = array2(0)
Run Code Online (Sandbox Code Playgroud)

因此

newarray(0) = 1
newarray(1) = 1
Run Code Online (Sandbox Code Playgroud)

我无法在VBA代码中执行此操作.
下面的代码段,如果您注释掉我尝试分配的最后一个部分,则array2(1)有效arraynew.

Function test()
    Dim array1(0 To 20) As String
    Dim array2(0 To 5) As Variant
    Dim count As Integer

    For count = 0 To UBound(array1)
     array1(count) = count
    Next count

    'now that array1 is filled i want to insert it into array2(1)
    array2(1) = array1 …
Run Code Online (Sandbox Code Playgroud)

arrays ms-access vba visual-studio

7
推荐指数
1
解决办法
3436
查看次数

标签 统计

arrays ×1

ms-access ×1

vba ×1

visual-studio ×1