Macro: problema de ejecucion

[Monimo]

Iniciado por aprendiz_82

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 // Transpose true quiere decir que lo que esta horizontal lo pegue vertical y al reves lo unico q deberías haber hecho es ponerle un False aquí...
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