expected array error for 2-D array

Question

I'm trying to create a two dimensional dynamic array, but keep getting the error "Expected Array" when it comes to ReDiming the bigArray. Any input on why this is happening? Also any help on creating this 2D array would be appreciated.

Thank you

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

You're missing some parentheses: Dim bigArray() As String

Rory
– Rory

2014-07-22 14:17:28 +00:00
Commented Jul 22, 2014 at 14:17 — Rory
– Rory, Commented Jul 22, 2014 at 14:17

Community · Accepted Answer · 2018-05-08 21:48:18Z

1

Arrays in Excel are declared using ()

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

edited May 8, 2018 at 21:48

CommunityBot

11 silver badge

answered Jul 22, 2014 at 14:18

Ravi Yenugu

3,8885 gold badges43 silver badges60 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

expected array error for 2-D array

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related