daniel esteban rojas zuluaga

Elsa Matilde respondió: Quitale la línea que dice END. O reemplazala por algún mensaje que te avise que no encontró el dato buscado. Sheets("BD ANALITIY"). Activate With Range("1:1") Set d = .Find("TELEFONO_CELULAR", LookIn:=xlValues, LookAt:=xlWhole) If Not d Is Nothing...

Luis Mondelo respondió: Te mando mi solución, sigue mis pasos: En este ejemplo los datos están en la hoja1 ocupando el rango A1:B30 (siendo la primera fila el encabezado). La siguiente macro se recorrerá la columna A fla por fila examinando su contenido y cuando encuentre...