Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

boton buscar siguiente VBA

Estas en el tema de boton buscar siguiente VBA en el foro de Visual Basic clásico en Foros del Web. Hola!! Tengon una table en excel en donde ya pude colocar un boton de busqueda, pero necesito colocar otro boton en donde haga una busqueda ...
  #1 (permalink)  
Antiguo 09/07/2012, 11:51
 
Fecha de Ingreso: julio-2012
Ubicación: México
Mensajes: 2
Antigüedad: 10 años, 1 mes
Puntos: 0
Pregunta boton buscar siguiente VBA

Hola!! Tengon una table en excel en donde ya pude colocar un boton de busqueda, pero necesito colocar otro boton en donde haga una busqueda siguiente y me de la información requerida, pero la verdad no se como hacerle, en seguida coloco el comando que puse para mi primera busqueda, gracias de antemano.

Private Sub CommandButton1_Click()
Dim expediente_nombre, expedienteBusca As String
Dim fila As Integer
fila = 1
expediente_nombre = TextBox1
Do While expedienteBusca <> expediente_nombre
fila = fila + 1
expedienteBusca = Range("H" & fila).Value
If expedienteBusca = Empty Then
MsgBox "Expediente no encontrado"
Exit Do

End If
Loop

TextBox2 = Range("B" & fila).Value
TextBox3 = Range("M" & fila).Value
TextBox4 = Range("N" & fila).Value
TextBox5 = Range("C" & fila).Value
TextBox6 = Range("K" & fila).Value
TextBox7 = Range("L" & fila).Value
TextBox8 = Range("G" & fila).Value
TextBox1.SetFocus

End Sub

Etiquetas: excel, siguiente, vba, botones, formulario
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 05:41.