Arrays

Sub exampleArray()
Dim Myrray(1 To 1048576, 1 To 1) As Long
Dim I As Long
For I = 1 To 1048576
    Myrray(I, 1) = I
Next
Range("B:B") = Myrray
End Sub
Total Page Visits: 39 - Today Page Visits: 1

Leave a Reply