[Resolvido]Ajuda com filtro em form avançado

Bom dia

Estou querendo que a medida em que eu digite em um campo.txt "não acoplado" em um form, filtre numa listbox os dados.

Se possivel gostaria que fizessem o exemplo no proprio arquivo abaixo p/ ver onde e como fazer p/ me servir de exemplo p/ os outros forms que tenho.

Já procurei no repositório mas não encontrei algo semelhante que me ajudasse a resolver isso.

Desde ja, agradeço muito p/ ajuda.

Coloque na versão 2003

Olá

Você ja olhou este exemplo?
Abraços

Obrigado p/ retorno, realmente é bem interessante este exemplo só que gostaria que os "Produtos" estivesse povoando a listbox e fosse filtrando a medida em que digitasse as letras co campo texto de pesquisa.

Agradeço antecipadamente a paciência e ajuda!

Como disse, é um exemplo

Ele serve para você colocar ele no teu aplicativo e fazer as mudanças necessárias.
Que mudanças são essas?
Os nomes de tabelas e controles.
Abraços

Desculpe acho que não me expressei bem. Eu observei e implantei no form este exemplo e funciona beleza, só que os dados no "exemplo" são carregados na listbox apenas quando inicia a digitação no "campo de pesquisa", e o que quero é que na listbox estejam todos os dados da tabela e que seja filtrado ao digitar no "campo de pesquisa".

Coloque uma listbox no formulário.
Na propriedde origem da linha clique no final da linha, vai abrir uma consulta, escolha a tabela que você quer que apareçam todos os registros.
Veja o numero de colunas que deseja que apareçam na lista box
Defina o tamanho de cada coluna.

Editando:
Agora entendi o que quer fazer na listbox do exemplo:

Substitua o código existente por esse:

Código:


Private Sub txtNome_Change()
Dim txtName As String
txtName = Me.txtNome.Text
If txtName = "" Then
  Me.Lista8.RowSource = "SELECT tblClientes.NomeCliente FROM tblClientes " & _
                        "ORDER BY tblClientes.NomeCliente;"

 
Else
  Me.Lista8.RowSource = "SELECT DISTINCTROW tblClientes.NomeCliente FROM tblClientes WHERE (((tblClientes.NomeCliente) Like '" & txtName & "*')) ORDER BY tblClientes.NomeCliente"
End If
End Sub


Abraços

Neste meu artigo tem aplicativo com varios exemplos de filtragens mas para a versão 2007/2010

http://www.usandoaccess.com.br/tutoriais/tuto35.asp?id=1#inicio

Bom estudo!

Obrigado p/ ajuda, agora deu certo.

Para fechar o tópico... me tirem uma dúvida, Percebi que muitos aqui no forum e em outro usam o access 2003 e não o 2007 que é mais recente , existe um motivo especifico p/ isso, tipo bug ou qualquer outro problema?

Pergunto porque estou tendo uns "atritos" com access 2007, costumo levar o banco de dados p/ cara p/ implantar novas funções e controles a medida em que aprendo mais, e tem hora que não funcionam nenhum controle que utilize pesquisa em SQL as vezes parece que deixei algum "fio molto" no programa p/ acontecer tem hora que parece bug não sei ainda.

obrigado mais uma vez p/ ajuda.

O seu office 2007 esta atualizado com o pacote sp2 ou sp3 ? Baixe direto do site da Microsoft.

Sucesso!

O Avelino está correto.
Provavelmente teu A2007 está desatualizado.
Eu uso ele e quando preciso converto ele para A2003 para postar anexos de exemplos aqui no fórum.
Abraços

Tópico resolvido, por falta de retorno atempado.