Copiar datos diferentes hojas otra hoja nueva

Por lo que entiendo necesitas pasar un rango de columnas con filas de una hoja a otra hoja en el mismo libro.. ¿es correcto?
-------
Sub Macro1()
'by EPONROB
'Abre hoja de origen y determina el numero de iteraciones
'hay que especificar la columna con la que se va a trabajar
Sheets("Sheet2").Activate 'hoja de origen de datos
Range("A" & Cells(Rows.Count, "A").End(xlUp).Row + 1).Select
numiteracion = ActiveCell.Row
fila = 1 'especifica el numero de fila donde se comenzaran a pegar los datos en la hoja destino
For i = 1 To numiteracion
Sheets("Sheet2").Select 'hoja de origen
Range("A" & i & ":" & "AZ" & i).Select 'Largo de la fila a copiar, columna de inicio y columna fin
Selection.Copy
Sheets("Sheet1").Select 'hoja destino
Range("A" & fila).Select 'fila es el numero de fila donde se pegaran los datos A1, A10, etc
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.End(xlDown).Select
fila = fila + 1
Next i
End Sub
-----------
Esta macro te permite copiar por filas de una hoja a otra hoja dentro del mismo libro, solo especifica el nombre de las hojas, especifica el largo de la fila, selecciona en la variable fila el numero de la fila donde comenzaras a pegar los datos, es cuestion de que la adaptes a tus necesidades.