Ayuda Formulario en VBA Hector Miguel o Otra Persona Please

24/05/2006 - 17:41 por Edison Torres | Informe spam
Necsito que me ayuden les comento

Estoy haciendo un formulario en la cual pido que me ingresen el numero de
cedula pero no se como hacer para que cuando mande a buscar dentro de una
hoja de Excel cuando lo encuentre me traiga la fila de ese numero Ejemplo

ingreso 0915335369 al presionar el boton de buscar lo encuentra y deberia de
traerme la fila de la hoja de excel

Cedula Nombres Codigo numero1 numero2 telefono direccion totales

Y sino lo encuentra que indique que mensaje "Cedula no encontrada".

Les agradeceria mucho de su ayuda

Preguntas similare

Leer las respuestas

#1 Valentín Playá
24/05/2006 - 18:25 | Informe spam
Edison,

esto se hace con BuscarV o BuscarH depende de la estructura de la tabla
en la que buscas. Creo que no tendrás problemas con los parámetros,
en el último dile que la tabla no está ordenada si quieres que te
busque el valor exacto.

Saludos,

Valentín
Respuesta Responder a este mensaje
#2 Héctor Miguel
25/05/2006 - 02:57 | Informe spam
hola, Edison !

... un formulario... pido que me ingresen el numero de cedula... como hacer para... buscar dentro de una hoja
... cuando lo encuentre me traiga la fila de ese numero
Ejemplo: ingreso 0915335369 al presionar el boton de buscar lo encuentra y deberia de traerme la fila de la hoja
Cedula Nombres Codigo numero1 numero2 telefono direccion totales
Y sino lo encuentra que indique que mensaje "Cedula no encontrada"...



seria bueno si comentas detalles mas... 'especificos/completos/descriptivos/...' :))
[en via de mientras] el siguiente ejemplo SUPONE las siguientes circunstancias...
-> el numero de cedula lo ponen en un TextBox1 en el formulario -?-
-> la hoja donde se ha de buscar ES la 'hoja2' -?-
-> la columna donde se busca la cedula en la hoja2 ES la columna 'B' -?-
-> es solo una forma de entre varias posibilidades mas [por desconocer el alcance y repeticiones que vaya a tener] :))

copia las siguientes lineas en el modulo de codigo de ese formulario en el evento '_click' del boton 'correspondiente'
Private Sub CommandButton1_Click()
Dim Fila As Long
With Worksheets("hoja2")
If Application.CountIf(.Range("b:b"), TextBox1) Then
Fila = Application.Match(TextBox1, .Range("b:b"), 0)
MsgBox "El dato buscado se encuentra en la fila " & Fila
Else
MsgBox TextBox1 & " No existe en la lista !!!"
End If
End With
End Sub

ya obtuviste el numero de fila... [ahora] el como, a donde, y donde te traigas 'el resto' de los datos/columnas/... -???-
dependera de los detalles que no comentaste :))

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida