Jerry Ram

Luis Mondelo respondió: Te mando mi macro para que lo inserte debajo. Lo he programado con la columna A y buscando la palabra no Sub inserta() Range("a65000").End(xlUp).Offset(1, 0).Value = "final" Range("a1").Select Do While ActiveCell.Value <> "final" If ActiveCell.Value...