Multibuscador

Dudas sobre código
garjonaj
Nivel 1
Mensajes: 2
Registrado: Mié May 09, 2018 9:43 am

Multibuscador

Mensajepor garjonaj » Jue May 17, 2018 2:33 pm

Hola a todos
Soy consciente de que Neckkito a puesto un ejemplo al respecto, muy bueno por cierto, sobre este tema pero me he quedado atascado...
Yo tengo solo una tabla, "articulos". Realizo la busqueda y respecto al resultado que ofrece el buscador, quiero pinchar dos veces (evento doble click) sobre un resultado me salga un formulario con los datos generales de ese registro. No tengo muy claro el codigo. ¿Alguien me lo puede explicar. Me explico el codigo que aparece en el ejemplo es este:_ (parte)

Case Is = "2"
DoCmd.Close acForm, "Escritos"
If Me.Lista0.ListCount = 0 Then
MsgBox "No hay Datos para mostrar.", vbCritical, "No Datos"
Exit Sub
End If
DoCmd.OpenForm "Escritos"
Set rst = Forms!Escritos.RecordsetClone
rst.FindFirst "IdEscrito=" & Me.Lista0
Forms!Escritos.Bookmark = rst.Bookmark
DoCmd.Close acForm, "BuscadorGeneral"

Se que la pregunta es de perogrullo, pero es que me he atascado. Como copio el registro "X" y lo muestro en el otro formulario

Avatar de Usuario
Fayad
Colaborador
Mensajes: 211
Registrado: Mié Oct 28, 2015 9:43 pm

Re: Multibuscador

Mensajepor Fayad » Jue May 17, 2018 3:59 pm

Hola!

Podrías utilizar la propiedad "OpenArgs":

http://www.accessyexcel.com/domina-la-propiedad-openargs-en-access/
Salu2.

garjonaj
Nivel 1
Mensajes: 2
Registrado: Mié May 09, 2018 9:43 am

Re: Multibuscador

Mensajepor garjonaj » Vie May 18, 2018 10:13 am

Muchas gracias.
Al final lo comprendi
Fayad, aun asi probare tu opcion. Siempre es bueno otras cosas


Volver a “Código VBA”

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados