** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Busqueda por Cuadro de Texto Independientes
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoBusqueda por Cuadro de Texto Independientes

 Responder Responder
Autor
Mensaje
Grandalf Ver desplegable
Habitual
Habitual
Avatar

Unido: 04/Mayo/2017
Localización: Valencia
Estado: Sin conexión
Puntos: 60
Enlace directo a este mensaje Tema: Busqueda por Cuadro de Texto Independientes
    Enviado: 11/Mayo/2017 a las 18:25
Hola a tod@s!

Me dispongo a aprender a hacer búsquedas a través de Cuadros de Texto independientes.

Es decir, dentro de un formulario he añadido un cuadro de texto independiente, el cual quiero introducir el "ID_Factura" y me abra dicho formulario.

59148a2701bf9-Buscar_ID

Private Sub Busca_IDFact_AfterUpdate()
DoCmd.OpenForm "frmFACTURA", , , , , , Me![IdFACTURA]
Set rst = Forms!frmFACTURA.RecordsetClone
rst.FindFirst "[IdFACTURA] = " & Me![IdFACTURA]
Forms!frmFACTURA.Bookmark = rst.Bookmark
End Sub

Pero el código no es correcto, solo me abre formularios. no realiza la apertura del formulario deseado.

¿Que es lo que está mal?

Saludos y Gracias

Arriba
emiliove Ver desplegable
Moderador
Moderador


Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 4991
Enlace directo a este mensaje Enviado: 11/Mayo/2017 a las 20:04
Yo entiendo lo que quieres hacer pero, creo que te metes en honduras, access cuenta con los cuadros combinados que nos ayudan a encontrar sin equivocación el dato a buscar y el asistente para cuadros combinados tiene uno para hacer búsquedas, si lo tienes en el formulario de Facturas te hace la búsqueda.
También cuentas en el foro en la sección de mis funciones favoritas con varios ejemplos sobre buscadores de VIMIPAS (Hola Vicente) que creo que prácticamente cubre todos los ángulos.
Por que tienes que entrar al formulario Facturas si puedes solo ver en otro formulario lo que te interesa, por ejemplo en:
https://onedrive.live.com/?id=15733BEA2103E55F%21116&cid=15733BEA2103E55F
Baja: Gabriel y miras lo que hace consulta cliente.

Saludos.


Editado por emiliove - 11/Mayo/2017 a las 20:10
Arriba
Grandalf Ver desplegable
Habitual
Habitual
Avatar

Unido: 04/Mayo/2017
Localización: Valencia
Estado: Sin conexión
Puntos: 60
Enlace directo a este mensaje Enviado: 12/Mayo/2017 a las 09:10
Muchas Gracias por la información.

Me ha valido el ejemplo que me he descargado "gabriel"

Dentro de mi formulario he añadido un cuadro combinado:
- Que busque los valores en una tabla o consulta.
- He seleccionado la tabla o consulta donde debe realizar la búsqueda.
- He seleccionado el campo deseado a incluir en el cuadro combinado.

En la hoja de propiedades en Eventos, Después de actualizar:

Private Sub Cuadro_combinado6_AfterUpdate()
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[idCliente] = " & Str(Nz(Me![Cuadro combinado6], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

Gracias por todo.

Doy el tema por SOLUCIONADO.

Saludos
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable