Actividad pública reciente
Ha valorado "Buena" la respuesta
Macro copiar una fila a la siguiente
Prueba con este código es para insertar después de la que esta señalada Sub CopiarFila_Click() Dim Fila As Long With Worksheets("Hoja1") Fila = ActiveCell.Row If WorksheetFunction.Count(.Rows(Fila)) = 0 Then MsgBox "No hay datos en la fila " & Fila...