Actividad pública reciente
Ha añadido un comentario en una respuesta de la pregunta
Copiar a otra hoja, en la ultima fila, solo valores
Te mando la macro hecha por mi y con menos líneas: Sub prueba() 'por luismondelo Sheets("datos").Select Range("d7:e7").Copy Sheets("hist").Select Range("a65000").End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues End Sub recuerda finalizar la consulta