[Resolvido]Vários filtros

Bom dia .......
Sei que já existem vários tópicos sobre este tema, inclusive alguns muito bons, com exemplos e tudo.
Porém não consegui decifrar o código para adapta-lo a minhas necessidades; então aqui estou solicitando ajuda.....
Vamos lá.
Estou criando (tentando) um sistema de controle de parcelas.(meu primeiro)
A intenção era criar um formulário e um sub formulário(este vinculado a tabela parcelas), para possibilitar um filtro.
Mas o mesmo tem de possibilitar vários filtros ao mesmo tempo.
Exemplo:
Como o subformulário esta vinculado a tabela parcelas este exibirá todas as parcelas cadastradas.
Posso filtrar por cliente e ao mesmo tempo apenas as parcelas em atraso em determinado período.
Intenção:
Criar uma combobox vinculado aos clientes. ' Quando selecionar o cliente mostrar todas as parcelas do mesmo.
Uma para status da parcela(Pendente ou Vencida) 'filtra apenas parcelas com este status.
E preciso que o filtro possam ficar ativos juntos, ou seja, neste caso, retornara apenas as parcelas vencidas ou as pendentes de determinado cliente.

Desde já agradeço.

porque não fazes em duas combox?

Desculpe a demora....
Eu segui seu conselho Óscar Santos, só que como não tenho conhecimento de access,(principalmente VBA) demorei um certo tempo até compreender bem o conceito e conseguir aplicar; Mas agora já esta funcionando perfeitamente (assim que terminar posto o código (ou 'projeto de código')).....
No entanto me apareceu outro problema....
Como filtrar por data (data inicial / data final)
Gostaria que retornasse apenas o intervalo, ou seja, apenas os registros que pertencentes a este intervalo de tempo Data final - data inicial.
Aguardo retorno..

Desde já agradeço......

Olá Edu,

Utilize SQL para realizar este filtro. Vamos ver um exemplo:

Coloque este código em um botão:

Código:


Me.RecordSource = "SELECT * FROM tblNomes WHERE DATAENTRADA Between #" & _
Format(Me![DataEntrada], "mm/dd/yyyy") & "# And #" & Format(Me![DataSaída], _
"mm/dd/yyyy") & "#"

Bom dia (se bem que quando terminar de redigir já poderá ser boa tarde.)
Vamos la,
1) Meu projeto é um controle de contas a receber, ou seja, Todas as parcelas geradas possuem uma [DataVencimento]
2) Ele funciona da seguinte maneira, Criei um formulário e acoplei a ele um subformulário (SubTabParcelas)( Este subformulário é oriundo da [TabParcelas] e o mesmo possui todas as parcelas de todos os clientes( Isto mesmo, um cliente pode possuir varias parcelas) No formulário coloquei combox [CombNomecliente]/[CombStatus]/[CombCodigo]. ao selecionar por exemplo 'Pedro dos Santos' na [CombNomeclientes] o (SubTabParcelas) só exibe as parcelas vinculadas ao cliente Pedro dos Santos, tanto as vencidas,pagas, e as pendentes (Se selecionar por exemplo no [CombStatus] 'Pago' retornara as parcelas de 'Paulo dos Santos' com o status pago) podendo filtra- las ainda por código (todos ao mesmo tempo ou apenas um ou dois deles, ou seja, os filtros ficaram perfeitos.

O que preciso.
Percebi que não poderei usar combox ^^.Gostaria de adicionar este controle por data, para por exemplo filtrar todas as parcelas de um período.

Olá Edu,

Posta aí o seu código para vermos como poderemos ajuda-lo melhor !!! Seja como for o filtro se dará mais ou menos da forma como lhe mostrei, isto é, na formatação para campos do tipo Data/Hora.

If IsNull(Me.combo1) And IsNull(Me.combo2) Then
 TabContratos_subformulário1.Form.FilterOn = False
ElseIf IsNull(Me.combo1) Then
 TabContratos_subformulário1.Form.Filter = "[Estatuspagamento] = '" & combo2.Value & "'"
 TabContratos_subformulário1.Form.FilterOn = True
ElseIf IsNull(Me.combo2) Then
 TabContratos_subformulário1.Form.Filter = "[Nome] = '" & combo1.Value & "'"
 TabContratos_subformulário1.Form.FilterOn = True
Else
 TabContratos_subformulário1.Form.Filter = "[Nome] = '" & combo1.Value & "' AND [Estatuspagamento] = '" & combo2 & "'"
 TabContratos_subformulário1.Form.FilterOn = True
 End If

Este ainda é o projeto inicial, mas já permite uma visão de como funcionará, este exemplo só possui 2 combox.

Olá Edu,

Estude sobre filtragens no site do Avelino.

http://www.usandoaccess.com.br/tutoriais/aprenda-filtragens-no-access.asp

Olha este exemplo que acredito que poderá ser aplicado no seu caso:

Dim filtro As Variant

filtro="Format(me!txDataInicial,"mm/dd/yyyy") & "# AND #" & Format(me!txDataFinal,"mm/dd/yyyy")"

If IsNull(Me.combo1) And IsNull(Me.combo2) Then
 TabContratos_subformulário1.Form.FilterOn = False
ElseIf IsNull(Me.combo1) Then
 TabContratos_subformulário1.Form.Filter = "[Estatuspagamento] = '" & combo2.Value & "'"
 TabContratos_subformulário1.Form.Filter =  "[DataEntrega] Between #" & filtro &  "#;"
 TabContratos_subformulário1.Form.FilterOn = True
ElseIf IsNull(Me.combo2) Then
 TabContratos_subformulário1.Form.Filter = "[Nome] = '" & combo1.Value & "'"
 TabContratos_subformulário1.Form.FilterOn = True
Else
 TabContratos_subformulário1.Form.Filter = "[Nome] = '" & combo1.Value & "' AND [Estatuspagamento] = '" & combo2 & "'"
 TabContratos_subformulário1.Form.FilterOn = True
 End If

filtro="Format(me!txDataInicial,"mm/dd/yyyy") & "# AND #" & Format(me!txDataFinal,"mm/dd/yyyy")"

Esta parte do código esta dando problema, e com meu conhecimento atual não consigo identificar o erro.

Esta parte em negrito fica em destaque, e segue a seguinte mensagem
(Erro de compilação; Era esperado fim da instrução)

Vou dar uma olhada no site que me passou e tentar resolver.

Obrigado boa tarde...

Quanto aos filtros a ideia das combox foi muito boa obrigado...
quanto ao filtro de datas ainda estou tentando, mas vou abrir um tópico específico, muito obrigado pela ajuda de todos