PK pregunta:
Tengo una hoja de trabajo donde ingreso algunos valores. Al hacer clic en un botón de macro, quiero que los valores o sus resultados calculados se agreguen a una hoja o archivo diferente.
Buena pregunta. Digamos que los valores están en las celdas C10 y E12 de Sheet1 y desea que se agreguen a la siguiente fila en Sheet2.
El verdadero truco aquí es el código para encontrar la siguiente fila en Sheet2. Comenzando en la última fila en Sheet2 (A65536) y luego usando .End (xlup) encontrará la última fila con datos en la columna A. Agregar 1 a esa fila lo dirigirá a la siguiente fila para datos en Sheet2. Utilice este código:
Sub CopyThem() NextRow = Worksheets("Sheet2").Range("A65536").End(xlUp).Row + 1 Worksheets("Sheet2").Cells(NextRow, 1).Resize(1, 2).Value = Array( _ Worksheets("Sheet1").Range("C10").value, _ Worksheets("Sheet1").Range("E12").value) End Sub
