繁体   English   中英

二维数组的预期数组错误

[英]expected array error for 2-D array

我正在尝试创建一个二维动态数组,但是在重新定义bigArray时,总是出现错误“ Expected Array”。 为什么会这样? 此外,任何有关创建此2D阵列的帮助将不胜感激。

谢谢

Sub Button2_Click()


Dim i As Integer, j As Integer
Dim Lastrow As Long
Sheets("3").Activate
Lastrow = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
Sheets("4").Activate

Dim myArray As String
**Dim bigArray As String
ReDim bigArray(0 To 1, 0 To 1) As String**
j = 0


For i = 2 To Lastrow
    If Not IsEmpty(Sheets("3").Cells(i, 1).Value) Then
        myArray = Array(CStr(Sheets("3").Cells(i, 10).Value), CStr(Sheets("3").Cells(i, 20).Value))
        If UBound(myArr) > 1 Then
            ReDim Preserve bigArray(LBound(bigArray) To UBound(bigArray) + 1, 0 To 1) As String
        End If
        bigArray(UBound(bigArray), 0) = myArray(0)
        bigAray(UBound(bigArray), 1) = myArray(1)
    End If
Next i

End Sub

Excel中的数组使用()声明

Dim bigArray() As String
ReDim bigArray(0 To 1, 0 To 1) As String

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM