Modificar Combo box |
Responder |
Autor | |
Pp2010
Asiduo Unido: 20/Mayo/2010 Localización: Estados Unidos Estado: Sin conexión Puntos: 265 |
Tema: Modificar Combo box Enviado: 01/Agosto/2019 a las 22:05 |
Buenas tardes y gracias por todo lo aprendido. Queria saber si es posible hacer lo siguiente, en un formulario con el asistente cree un Combo box que busca los registros de una tabla y lo muestra, la pregunta: se puede modificar la forma de busqueda que no sea por la primera letra y que busque en cualquier parte del campo. Tengo varios ejemplos de busqueda que uso, pero lo que pretendia era modificar el que crea el asistente. Gracias por cualquier comentario que me puedan hacer. |
|
mounir
Colaborador Unido: 09/Febrero/2009 Localización: Asturias-España Estado: Sin conexión Puntos: 6479 |
Enviado: 01/Agosto/2019 a las 22:50 |
Un Saludo.
|
|
VIMIPAS
Colaborador Unido: 06/Enero/2006 Localización: ESPAÑA Estado: Sin conexión Puntos: 5462 |
Enviado: 01/Agosto/2019 a las 23:13 |
Hola buenas noches a todos.
Y en este justo lo que pides (y además, de tres formas distintas y con dos funciones distintas): Saludos.
|
|
Gracias
|
|
Pp2010
Asiduo Unido: 20/Mayo/2010 Localización: Estados Unidos Estado: Sin conexión Puntos: 265 |
Enviado: 02/Agosto/2019 a las 22:10 |
Muchas gracias mounir y Vimipas por su ayuda, de alguna manera conocia esos ejemplos, problablemente no los entiendo por completo pero me han sido de ayuda pues no soy programador. Realmente lo que buscaba era que en la medida que fuera escribiendo en el combo box la lista desplegable del mismo, se fuera actualizando con los registros encontrados que coincidan con lo escrito pero en cualquier lugar del texto de ese campo, ejemplo si escribo "ca", apareciera "cama", "laca" etc. El combo box que se genera con el asistente solo busca por las iniciales de la palabra, de tal manera que la palabra "laca" no apareceria. Por ultimo este combo esta en un subform con el que voy agregando articulos que estan en una tabla "Inventario", espero aclara un poco mas mi intencion, de nuevo gracias por su ayuda.
|
|
mounir
Colaborador Unido: 09/Febrero/2009 Localización: Asturias-España Estado: Sin conexión Puntos: 6479 |
Enviado: 02/Agosto/2019 a las 22:53 |
Un Saludo.
|
|
mounir
Colaborador Unido: 09/Febrero/2009 Localización: Asturias-España Estado: Sin conexión Puntos: 6479 |
Enviado: 03/Agosto/2019 a las 00:25 |
Hola:
Al final me ha picado la curiosidad y te hice un simple ejemplo:- http://www.filebig.net/files/N72aLniEH2 En el hay dos formularios uno es lo que indica el enlace anterior y otro como mas o menos lo quieres. |
|
Un Saludo.
|
|
rokoko
Colaborador Unido: 16/Febrero/2008 Localización: Pamplona Estado: Sin conexión Puntos: 3062 |
Enviado: 03/Agosto/2019 a las 12:08 |
Simple y efectivo. Le he modificado una linea y asi evita buscar acentos o caracteres especiales(para el que lo quiera). Parece que funciona bien, pero probarlo a fondo..... Por ejemplo Marìa o Maria lo buscara igualmente Private Sub Cuadro_combinado23_Change() ' Elimina el filtro del formulario, ' si el cuadro combinado está vacío If Nz(Me.Cuadro_combinado23.Text) = "" Then Me.Form.Filter = "" Me.FilterOn = False ' Si se filtra un ítem del cuadro combinado, ' realiza una búsqueda exacta en el formulario ElseIf Me.Cuadro_combinado23.ListIndex <> -1 Then Me.Form.Filter = " [NombreCompañía] = '" & Replace(Me.Cuadro_combinado23.Text, "'", "''") & "'" Me.FilterOn = True ' Filtra en formulario con una coincidencia parcial Else 'Con StrConv )"xxxxx",2, 1042) conseguimos que omita acentos o caracteres especiales en la busqueda Me.Form.Filter = " StrConv([NombreCompañía], 2, 1042) Like '*" & Replace(Me.Cuadro_combinado23.Text, "'", "''") & "*'" Me.FilterOn = True End If ' Mueve el cursor al final del cuadro combinado Me.Cuadro_combinado23.SetFocus Me.Cuadro_combinado23.SelStart = Len(Me.Cuadro_combinado23.Text) End Sub Editado por rokoko - 03/Agosto/2019 a las 12:09 |
|
mounir
Colaborador Unido: 09/Febrero/2009 Localización: Asturias-España Estado: Sin conexión Puntos: 6479 |
Enviado: 04/Agosto/2019 a las 01:58 |
Hola!
Genial, ha quedado perfecto. Muchas gracias por compartir. |
|
Un Saludo.
|
|
VIMIPAS
Colaborador Unido: 06/Enero/2006 Localización: ESPAÑA Estado: Sin conexión Puntos: 5462 |
Enviado: 04/Agosto/2019 a las 11:30 |
Buenos días.
Por mi tierra existe la costumbre de usar muchos apellidos que contienen la ñ. Y por supuesto España. Lo digo porque lo que hay encima de la ñ, también es tratado, por Access, como un acento y entonces no aparecería en las búsquedas que contengan la ñ. Tan solo hay eso, evidentemente habría que adecuarlo, para evitar posibles errores de NO existir, cuando realmente NO encuentra y sin embargo SI existe. Saludos. P.D.: Acabo de acordarme que lo leí en el blog de Raipon hace varios años. Os pongo el enlace para que lo estudiéis si os interesa: Hasta luego.
Editado por VIMIPAS - 04/Agosto/2019 a las 11:38 |
|
Gracias
|
|
Mihura
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Administrador Unido: 06/Mayo/2005 Localización: En la dehesa Estado: en línea Puntos: 14017 |
Enviado: 04/Agosto/2019 a las 14:12 |
Buen apunte VIMIPAS, sólo un añadido al mismo, ... es 'caro' en cuanto a procesador, cuando las búsquedas son sobre tablas con muchos registros y estos contienen muchos caracteres los tiempos de respuesta se resienten ... y mucho.
|
|
Pp2010
Asiduo Unido: 20/Mayo/2010 Localización: Estados Unidos Estado: Sin conexión Puntos: 265 |
Enviado: 05/Agosto/2019 a las 01:09 |
Muchisimas gracias!!!!!!, me abruma tanto conocimiento, es genial. Gracias a mounir pues se tomo el trabajo de hacer un ejemplo que me fue de mucha ayuda, gracias a los comentarios ademas de rokoko, vimpas y Mihura, muchas gracias a todos, es un grupo genial. La solucion final que utilice fue la de mounir y la modificacion de rokoko, por lo que se puede cerrar el hilo.
|
|
Responder | |
Tweet
|
Ir al foro | Permisos de foro Usted No puede publicar nuevos temas en este foro Usted No puede responder a temas en este foro Usted No puede borrar sus mensajes en este foro Usted No puede editar sus mensajes en este foro Usted No puede crear encuestas en este foro Usted No puede votar en encuestas en este foro |