[Resolvido]Como faço para filtrar uma busca em caixa de combinação no meu formulário?

Bom Dia,

E possível fazer uma busca em caixa de combinação no meu formulário?

Em casixa de combinação ou caixa de Listagem, vc irá alterar a propriedade .RowSource da sua Caixa de Listagem! Nela vc irá colocar o SQL completo com a Filtragem incluindo o que digitou no campo!


De uma pesquisa que encontrará inúmeros exemplos do caso!


Ex: No evento ao Alterar do seu campo de pesquisa coloque:


Me.NomecxListagem.RowSource = "SELECT * FROM NOmeTabela WHERE NomeCampoTabela Like '*" & Me.NomeCampoPesquisa & "*'"

Olá, Fábio

Por favor, ajudar se possível

Não tenho noção de programação do Access. Meu conhecimento é básico. E o programa que estou criando é para meu uso pessoal.

Dúvida:

1) Preciso apagar totalmente o outro código para colocar o indicado por você?

2) Já fiz isso de apagar totalmente o outro código e coloquei o seu, mas não deu certo?

Segui a sua orientação.
No evento ao Alterar do seu campo de pesquisa coloque:

AMigo, o que tem de errado no seu código é o Nome da tabela...

Se contiver caracteres especiais e ou espaços no nome, deve ser informado entre colchetes.

Substitua: pedido de compra subformulário sub
por: [Nome da Sua Tabela] e não o nome do formulário!

Alem do mais, o nome da caixa de listagem tem que ser alterado... Colocado o nome correto de sua caixa de listagem

Só mais uma coisa:
Na sua dúvida vc questionou isso:

E possível fazer uma busca em caixa de combinação no meu formulário?

Porém, baixando seu exemplo eu não achei nenhuma CAIXA DE LISTAGEM/Combinação no seu exemplo!


Qual é realmente sua Dúvida? Pois as orientações que passei são para CAIXA DE LISTAGEM/Combinação

Olá, Fabio

Obrigado pela ajuda e paciência em ensinar.

Qual é realmente sua Dúvida?

Quero ter duas opções de filtro nesse campo de Localização de Pedido:
- Digitar.
- Selecionar um nome.

Após a escolha quero que o Subformulário filtra somente o nome da Empresa escolhida. Exemplo: Casas Bahia.
Assim vai aparecer somente os Pedidos de Compras da Empresa Casas Bahia.

A sim amigo!!! Isso é uma caixa de combinação sim... O problema é que eu entendi que queria aplica ro filtro na caixa de combinação. e Nao no formulário!!!

Como quer aplicar filtro ao Formulário, com o código que ja está no evento ao Alterar, mude ele para o Evento Após atualizar! Assim, ao selecionar um valor ou digitar e sair o Filtro já será aplicado.

Boa Tarde, Fábio

Obrigado pela ajuda e paciência.

Cara. Estou quebrando a cabeça aqui. Por favor, ajudar se possível.

Segue abaixo o que eu fiz:

Digitei o código no campo Localização de Pedido na aba evento após atualizar. Esse campo esta nomeado Filtro.

Mas esta dando erro.

A minha maior confusão e saber nomear certo os campos no código passado por você. Já tentei diversas vezes, mas não consigo executar o filtro da forma certa.

Por favor, se possível verificar o meu arquivo BD Teste postado aqui e corrigir ele. Após a correção eu verifico o VBA para aprender e ver aonde eu errei.

Amigo, apague o codigo atual, e coloque o codigo a seguir em dois eventos:

Ao Alterar e Apos Atualizar:

Código:

Dim cxPesquisar As String
cxPesquisar = Filtro.Text

If cxPesquisar <> "" Then
Me.Pedido_de_Compras_subformulário.Form.Filter = "Empresa Like '*" & cxPesquisar & "*'"
Me.Pedido_de_Compras_subformulário.Form.FilterOn = True
Else
Me.Pedido_de_Compras_subformulário.Form.FilterOn = False
End If

Olá, Fábio

Muito Obrigado pela ajuda e paciência em ensinar.

Agora deu 100% resolvido.

Grato