** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Varios Criterios de Buqueda
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoVarios Criterios de Buqueda

 Responder Responder
Autor
Mensaje
simonpru Ver desplegable
Habitual
Habitual
Avatar

Unido: 24/Febrero/2009
Localización: España
Estado: Sin conexión
Puntos: 194
Enlace directo a este mensaje Tema: Varios Criterios de Buqueda
    Enviado: 13/Noviembre/2020 a las 18:29
Buenas no se si ha comentado por aqui, tengo una tabla y quiero crear un formulario de busqueda que contenga varios campos, pero puede ser que los campos lleven algun valor o no, y el resultado que aparezca en otro formulario.

No se si me he explicado bien.

Gracias de antemano.

Un saludo.

Arriba
xavi Ver desplegable
Administrador
Administrador
Avatar
Terrassa-BCN

Unido: 10/Mayo/2005
Localización: Catalunya ||||
Estado: Sin conexión
Puntos: 14720
Enlace directo a este mensaje Enviado: 13/Noviembre/2020 a las 19:48
Hola,

El escenario que planteas es ambiguo y deja lugar a interpretaciones así que interpretaré mediante un ejemplo.

Tienes un formulario con los controles para filtrar y otro formulario basado en la tabla (imaginemos clientes) a la que quieres aplicar los filtros para acotar la cantidad de registros.

Inicias el criterio con algo que se cumpla siempre: que IdClientes (un autonumerico en la tabla de clientes) sea <> 0
strCriterio = "IdClientes <> 0 "

A partir de aquí evalúas si hay filtros aplicables.

If Me!cboFiltroComercial <> 0 Then
  strCriterio = strCriterio & "AND Comercial = " & Me!cboFiltroComercial & " "
End If

If Me!txtRazonSocial <> "" Then
  strCriterio = strCriterio & "AND RazonSocial Like '*" & Me!txtRazonSocial & "*' "
End If

Y así con todos los criterios. Al final acabas con una cadena de filtro que puedes utilizar en el argumento WhereCondition del OpenForm.

¿Te vale?

Un saludo
Xavi, un minyó de Terrassa

Mi web
Arriba
simonpru Ver desplegable
Habitual
Habitual
Avatar

Unido: 24/Febrero/2009
Localización: España
Estado: Sin conexión
Puntos: 194
Enlace directo a este mensaje Enviado: 20/Noviembre/2020 a las 16:57
Gracias Crack, se puede cerrar el tema

Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable