quisiera plantear otra consulta, disculpen la ignorancia.
encontre otro ejemplo, pero hay un problema, los datos que estan ordenados de manera horizontal, este codigo los copia a la ultima pagina pero de manera vertical.
Código:
Sub mandardatos()
Sheets("Pendientes").Select
Range("2:1").Select
Selection.Insert
Sheets("Josue").Select
Range("F6:A2").Select
Selection.Copy
Sheets("Pendientes").Select
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Sheets("Josue").Select
Range("F6:A2").Select
Application.CutCopyMode = False
End Sub
el codigo lo tome de aqui:
http://www.todoexpertos.com/categori...a-excel-a-otra