Cómo buscar un rango de celdas para un valor coincidente en Excel VBA

Microsoft Excel es una hoja de cálculo que puede contener una gran cantidad de datos: hasta un billón de células de información por hoja de cálculo. Si bien esto puede ser muy valiosa si necesita grandes conjuntos de datos de entrada, puede que sea todo un reto si usted está buscando una pieza particular de información en una hoja de cálculo. Excel Visual Basic para Aplicaciones (VBA) se puede encontrar ese partido celular en una fracción de segundo.

Instrucciones

1 Abra la hoja de cálculo en la que desea encontrar una coincidencia. Pulse la tecla "F11", "Alt" y juntos. Esto abre el Editor de Visual Basic (VBE).

2 Haga clic en "Insertar" y luego haga clic en "módulos". Esto inserta una ventana del módulo en blanco.

3 Copia y pega el siguiente código en la ventana en blanco:

Sub Find_First ()

Dim como secuencia FindString

Dim Rng como gama

FindString = InputBox ( "Introduzca un valor de búsqueda")

Si Trim (FindString) <> "" Entonces

Con Sheets ( "Sheet1") Rango. ( "A1: Z256")

Establecer RNG = .find (Qué: = FindString, _

Después de:. = Cells (.Cells.Count), _

Lookin: = xlValues, _

LookAt: = xlWhole, _

SearchOrder: = xlByRows, _

SearchDirection: = xlNext, _

MatchCase: = False)

Si no RNG es nada entonces

Application.Goto RNG, True

Más

MsgBox "momento"

Terminara si

Terminar con

Terminara si

End Sub

4 Cambiar el "intervalo" en el código para el rango de celdas en las que desea buscar coincidencias. Por ejemplo, si desea buscar en las celdas C1: C1000, tipo "C1: C1000" en lugar de "A1:. Z256"

5 Pulse la tecla "F5", a continuación, escriba la cadena de texto o datos que desea encontrar en el cuadro de texto. Excel encontrará el partido y resaltar la celda.

Consejos y advertencias

• Pulse la tecla "F11", "Alt" y en cualquier momento para alternar entre el VBE y la hoja de cálculo.