Hola de nuevo,
Dando una vuelta al tema, he interpretado que quizá la solución que buscabas era otra. Si lo que buscabas era aflorar el concepto 'folio' partiendo del resto de variables, quizá el archivo adjunto te dé una idea de cómo abordar la solución.
He corregido algunos importes, para confirmar que la asignación recoja los resultados más probables.
Saludos,
Base 05 (C).xlsx
Por
Victor7, · publicado
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.