arrays - 在VBA中将字符串作为数组名称传递

Question

我想将数组名称作为字符串传递。

 Dim i as Integer
 Dim arName as String
 Dim ar1(10) as Integer 'array of 10 elements
 Dim ar2(10) as Integer
 Dim ar3(10) as Integer

 for i = 1 to 3
     arName ="ar" & i
     arName(1)=34 ' I want 34 in every 1st element of all three arrays 
 Next i
 End sub

我正在这样做作为阵列练习。如何将数组名称作为字符串传递是我的问题

标签： arraysvba

Answer 1

Just create a single multi-dimensional array

Dim i As Integer
Dim arr(1 To 3, 1 To 10) As Integer
For i = 1 To 3
    arr(i, 1) = 34
Next