paramisolo respondió:
Vamos a ver si te he entendido copias las celdas de A a B y la celda de la columna H de A debe estar vacía, la macro quedaría así: Sub Copiar_Pegar() Dim cel1, cel2, cel3, valor, cel4, cel5, cel6, cel7 As String Sheets("Hoja1").Select 'Suponiendo que...