You should be able to record a macro copy the information  (Tools-
Macro-Record). Then, look at the macro to see how it works (Tools-
Macro-Visual Basic Editor). You may get something like:

Sub Macro1()
Sheets("Sheet1").Select
Range("A1:A3").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste
End Sub

To put values in an array, you can do it like this:

Sub test()
MyArray = Sheets("Sheet1").Range("a1:a3")
'This makes a 3 by 1 variant array.
Debug.Print MyArray(3, 1)
End Sub