[Solved] Read worksheet into 2 dimentional array [duplicate]

by

[ad_1]

Here is a typical example of pulling 50 columns of data with a variable number of rows from the active worksheet into a two dimensional array:

Sub GetData()
    Dim r As Range
    Dim N As Long
    N = Cells(Rows.Count, "A").End(xlUp).Row
    arr = Range("A4:AX" & N)
End Sub

[ad_2]

solved Read worksheet into 2 dimentional array [duplicate]