Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
A better way to browse. Learn more.
A full-screen app on your home screen with push notifications, badges and more.
Este tema está ahora archivado y está cerrado a más respuestas.
Saludos,
intento simplemente crear un macro para copiar y pegar celdas de dos hojas diferentes desde la ultima celda vacia.. "es mi primer macro"
Sub nuevos()
Dim ultimafila As Long
ultimafila = Sheets("Hoja2").Range("B20000").End(xlUp).Row
ultimafila = ultimafila + 1
Sheets("FORMATO").Range("K13").Copy
Sheets("Hoja2").Cells(ultimafila, 2).Select en esta linea presenta el error
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("FORMATO").Range("K15").Copy
Sheets("Hoja2").Cells(ultimafila, 4).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
me podrian guiar un poco.. gracias.