[Resolvido]Filtro não da certo.

Ola gente,neste exemplo quero filtar na caixa de texto os campos Componente - Identificacao e Gaveta,mas ta dando algum erro,,gostaria que dessem uma olhadinha.

dropbox.com/s/9t6u5e6pp2ub9tg/Filtrar.rar?dl=0

Olá Kaynan,

Criei uma rotina para filtro dos 3 campos, chamada "FiltroGeral".
Acredito que seja isso que vc quer.
Veja o código.

Segue versão do sistema


[]'s


FIM

Ola Alexandre,essa versão não ta filtrando nada na caixa texto.

Oi

O projeto está disponível com o código aberto.  Por que alterá-lo desta forma ?  
Está autorizado a usar sem qualquer restrição.  
Para ter acesso a estrutura, basta manter a tecla SHIFT na inicialização.  Lá vc irá ver como se realiza as filtragens.
O projeto recebeu atualizações.  Leia o tópico completo.
O arquivo limpo e completo está no início da segunda página do tópico

Bom estudo e um ótimo proveito!

https://www.eevblog.com/forum/projects/a-small-(open-source)-inventory-control-application-using-ms-access/msg3639178/#msg3639178

Kaynan,

Não coloquei filtro neste campo.
Coloquei apenas naqueles que vc mencionou. Voce analisou o código/

Quais os campos tem que fazer filtro?

[]'s

FIM

Alexandre eu vi o código mas porque as combo filtra mas não aparece os dados e eu queria tambem filtro na caixa texto,essa que esta escrito Filtrar Registros.

Alexandre coloquei tambem no evento ao alterar o FiltroGeral e começou a filtrar normal os registros,agora so falta na caixa texto ele filtrar qualquer um dos campos "Componente-Identificacao e Gaveta"

Olá Kaynan,

Coloquei um filtro dinâmico, e à medida que vc form digitando, ele vai filtrando os dados.

Segue versão

[]'s

FIM

É isso mesmo Alexandre,só que não ta aceitando espaço,mas ja ta bom.

Bom dia,no botão que limpa os filtros quando a pesquisa não encontra nada da uma mensagem de erro,tem como contornar isso.

Kaynan,

Manda a versão atualizada para analisar o erro do filtro.

[]'s

FIM

dropbox.com/s/ad35b85k5pnyzl3/Filtrar2.rar?dl=0

Opaa,resolvi o problema do limpa filtro com esse código..

Me.CombIden.Value = ""
Me.CombComp.Value = ""
Me.txtFiltro.Value = ""
Me.Form.FilterOn = False
DoCmd.ShowAllRecords
Me.RecordSource = "SELECT * FROM qryListaComp"
Me.Requery

Agora só falta na caixa texto ao digitar algo pra localizar,poder dar espaço.

Olá Kaynan,

Acredito que irá resolver sua dúvida.

Segue versão.

[]'s

FIM

Alexandre,agora nessa versão o form veio tudo em branco,quando digito algo na cx preenche o fotmulario mas ainda não aceita espaço na txt.

Opaa,pesquizando,consegui resolver esse último probleminha de não conseguir dar espaço na txt.
Obrigado Alexandre por sempre estar ajudando a gente.
Valeu amigo.

Valeu Kaynan,

O fórum agradece. E me desculpe por não responder antes!!!

Boa sorte