[Resolvido]Pesquisa com Combobox parou de funcionar

Olá. Tenho várias consultas por combobox nos meus formulários entretanto, as vezes elas não funcionam! fiz elas através do construtor do access mesmo .. alguém poderia me ajudar a fazer consulta mais efetivas de modo que isso não volte a acontecer? 

Oi Amanda,

Poste aqui seu banco de dados (somente partes envolvidas) para análise.

[]'s

Olá novamente Alexandre   nesse modelo coloquei dois dos meus formulários.. está funcionando perfeitamente, porém, no meu banco ainda não está funcionando :/

Entendi.

Mas faltou o banco de dados...rsss

No aguardo.

opa rs achei que tinha mandado... segue o anexo

no meu banco, os únicos que não estão funcionando são os que tem a apropria macro do access, ou seja, os que foram feitos com o assistente de caixa de combinação.

Bom dia Amanda,

Por gentileza, me informe quais os combobox e quais formularios não esta funcionando a pesquisa.

Att,

Alexandre

são os combobox de pesquisa... desses dois formulários, eles estão funcionando mas as vezes eles simplesmente param de funcionar.. ai dos volta a funcionar, ai eu queria saber se tem uma forma de fazer eles de modo q isso não aconteça..

eu acabei de abrir o banco e fiz as duas pesquisas e como vc pode ver, não apareceu nada mas antes estava funcionando. Não sei pq isso acontece.

Ok...entendi.
Vou verificar e assim que eu solucionar, eu te informo.

Obrigado.

Amanda,

Na pesquisa da tela Material, no combo de pesquisa, a coluna "Cod_Material" está escondida, e você quer pesquisar por "cod_material" ou pelo "Cod_CONTRATO"?

eu quero pesquisar por Cod_contrato, que seria o cod_dadosGerais pq todos os cadastros do banco são feitos dentro de um contrato.

Ok...vou verificar.

Valeu

ok, obrigada !

Amanda,

Segue nova versão do sistema.

Boa sorte.

Alexandre, obrigada pela resposta rápida! Esse código foi o que resolveu o problema? 

    Me.Filter = "" & Me.Cod_DadosGerais.Name & " = " & Cbo_Pesquisa.Column(1) & ""
    Me.FilterOn = True
    '------------------------------------------------------------------------------
    Me.Form.Requery

Sub teste()

strSQL = "UPDATE tbTessoureiro SET senha ='" & Me.verificaSenha & "' WHERE [Código] ='" & Variavel_Com_o_Código & "'"""
CurrentDb.Execute strSQL


End Sub

pra que serve essa parte?

Amanda,

Me.Filter = "" & Me.Cod_DadosGerais.Name & " = " & Cbo_Pesquisa.Column(1) & ""
Me.FilterOn = True
'------------------------------------------------------------------------------
Me.Form.Requery

Sim. Como você utilizou seu formulário acoplado à uma tabela ou query, desta forma é possível utilizar o filtro no formulário (Me.Filter), usando como critério o campo "Me.Cod_DadosGerais.Name" onde este é igual ao valor da coluna 1 do combo de pesquisa (Cbo_Pesquisa.Column(1)).

Sub teste()

strSQL = "UPDATE tbTessoureiro SET senha ='" & Me.verificaSenha & "' WHERE [Código] ='" & Variavel_Com_o_Código & "'"""
CurrentDb.Execute strSQL

End Sub

A rotina acima foi um teste que fiz para o colaborador @Crysostomo e eu aproveitei teu sistema aberto apenas para verificar a instrução dele que estava com problemas..

Pode excluir esta sub...sem problemas...rsss

É isso

Abraço

Ahhh, entendi kkkk okay, muito obrigada !