Anónimo respondió:
Copia y pega esta macro Sub MyMacro() dato = Worksheets("hoja1").Range("L10").Value Sheets("hoja2").Select Range("a1").Select On Error GoTo NoEncontro: [A:A].Find(What:=dato, After:=ActiveCell).Select If ActiveCell.Value <> dato Then NoEncontro:...