Estas en: gratiszona > trucos > trucos access

trucos access: Utilizar un cuadro combinado como filtro en un formulario

Supongamos que existe un formulario de facturacion en el que estan todas las facturas, tanto las pagadas como las impagadas. La tabla de facturas debe tener un campo [Situacion] de tipo numerico cuyos valores son:
1=Factura Pagada
2=Factura Impagada
Hay que incluir un cuadro combinado en el formulario cuyos valores en la propiedades deberan ser:
Nombre: filtro
Origen del Control:
Origen de la Fila: 0;'Todas';1;'Pagadas';2;'Impagadas'
Columna dependiente: 1
Numero de Columnas: 2
Ancho de Columnas: 0cm;2cm
Limitar a Lista: Si
despues de Actualizar: Insertar el siguiente procedimiento de Evento:
Private Sub AfterUpdate_filtro()
dim origen as string
origen = 'Select * from Clientes'
if me![filtro] <> 0 then
origen = origen & ' Where ((Clientes.situacion)= Forms![nombreformulario]![filtro]);'
else
origen = origen &';'
end if
me.recordsource = origen
me.requery
end sub
Este mismo truco se puede utilizar tambien para establecer el orden de los registros; en tal caso, en vez de emplear la clausula WHERE, se usaria la clausula ORDER BY.



Tal vez te interese sobre trucos access: