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 útil si usted necesita para 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. Cosas que necesitará
Excel 2007 o Excel 2010
Mostrar más instrucciones
1

Abra la hoja de cálculo en la que desee para encontrar una coincidencia . Pulse las teclas de " F11 ", " Alt" y en conjunto. Esto abre el Editor de Visual Basic (VBE ) .

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

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

Sub Find_First ()

FindString As secuencia

Rng As Range

FindString = InputBox ("Escriba un valor de Búsqueda")

Si Trim ( FindString ) < > "" Entonces
< . p> Con Sheets (" Sheet1" ) Range (" A1: Z256 ") .

Set Rng = Find ( What : = FindString , _

Después: . . = Cells ( células . conde ) , _

lookin : = xlValues ​​, _

LookAt : = xlWhole , _

SearchOrder : = xlByRows , _

SearchDirection : = xlNext , _

MatchCase : = False )

Si No RNG es nada entonces

Application.Goto Rng , Verdadero

demás
< p > MsgBox " No he encontrado nada "

End If End

Con

End If End Sub

4

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

Press "F5 ", a continuación, escriba la cadena de texto o los datos que desea buscar en el cuadro de texto. Excel se encuentra el partido y poner de relieve la célula.