[Resolvido]Caixa de combinação Como pesquisa

Estou querendo criar uma pesquisa com uma caixa de combinação que funcionara da seguinte forma. Seleciono o nome de um produto na caixa de combinação e os dados desse produtos aparecerão automaticamente em caixas de texto abaixo.

OBS: Sou novato em Acess VBA então por favor explique da forma mais simplificada possível.

Meu acess é o 2007.

Se quiser ver meu banco de dados posso enviar em anexo por e-mail é só pedir, se trata de um banco de dados de um mercantil que deve ter estoque, produtos essas coisas ja esta quase completo falta só essa pesquisa.

Olá Paulo, seja bem vindo ao forum. Sua combo contem todas as colunas a serem usadas? Ou seja, quando você a criou, pegou todos os campos que irá popular nos campos do formulário? Se sim, as colunas são numeradas começando do 0. Portanto, se tiver 4 campos, por exemplo, Código, Nome, Telefone e Endereço, a combo terá 4 colunas numeradas de 0 a 3. Você pode usar o index desses campos no evento "Após atualizar" da combo. No exemplo que passei, seria assim:

Me.txtNome = Me.NomeDaCombo.Column(1)
Me.txtTelefone = Me.NomeDaCombo.Column(2)
Me.txtEndereço = Me.NomeDaCombo.Column(3)

Olha já havia visto esse exemplo tudo que sei do acess aprendi na net por isso não conheço bem os termos acredito que combo seja caixa de combinação certo? bem se é isso gostaria de dizer que no formulário só existe uma caixa de combinação. O que eu quero é que quando eu selecionar um produto na caixa de combinação os demais campos se auto preencham. Olha o Formulário.

tentei enviar um anexo

É isso mesmo que esse código faz. Quando criamos uma combo (caixa de combinação), temos a lista de campos da tabela para escolhermos. Vamos supor que na sua tabela tenha os campos Código, Nome, Telefone e Endereço, como no exemplo acima. Se você selecionar esses 4 campos, terá 4 colunas na combo, e cada uma terá um índice que vai de 0 a 3. São esses índices que representam os campos.

Olha esse código parece a coisa mais simples do mundo e certamente deve ser. Eu coloco tudo certinho vou ate dizer passo a passo e não da Certo.

1- Crio uma Caixa de Combinação através de uma tabela que contem os seguintes Campos(Produtos - Preço de Compra - Preço de Venda).

2- Crio 2 Caixas de texto e renomeio elas para Compra e a outra para Venda, e renomeio a combo para Produto.

3- Vou la em propriedades da combo escolho depois de atualizar e coloco construir código no VB digito o seguinte código

Me.txtCompra = Me.Produto.Column(1)
Me.txtVenda = Me.Produto.Column(2)

Salvo e abro o formulário de novo para ter certeza absoluta que atualizou seleciono o nome do produto na combo mas nada acontece onde eu errei?

"Obrigado pela Atenção espero não ter sido um erro muito idiota"

Você diz que renomeia os campos para Compra e Venda, mas no código está usando txtCompra e txtVenda. Você precisa usar os nomes corretos dos campos. Se os nomes são Compra e Venda, então você irá usar Me.Compra = Me.Produto.Column(1) e Me.Venda = Me.Produto.Column(2).

Eu já havia tentado isso! Amigo se não for pedir demais você poderia criar um banco de dados contendo uma unica tabela e um único formulário? Com esse exemplo.

Por Favor!

meu e-mail é paulorennan@bol.com.br

Tenho quase certeza que estou fazendo correto!

Veja aqui:

http://dl.dropbox.com/u/5454503/FiltrandoCombos.mdb

Antes de o banco de dados da o seguinte erro.


O aplicativo que você está tentando usar tem uma referência que não pode ser determinada, feita a um objeto, uma biblioteca de tipos, uma DLL ou um banco de dados externo. É possível que o objeto, a biblioteca de tipos, a DLL ou o banco de dados externo tenha sido excluído ou renomeado. Examine a lista Referências disponíveis na caixa de diálogo Referências do Editor do Visual Basic (menu Ferramentas) para saber se alguma ação é necessária. Se você não criou este aplicativo, contate o programador ou o administrador do sistema.
Se a referência apresentada na lista Referências disponíveis estiver precedida de "INEXISTENTE:", desmarque a caixa de seleção para remover a referência caso ela não seja mais necessária. Se ainda precisar usar a referência, desmarque a entrada da caixa de seleção de "INEXISTENTE: " na lista Referências disponíveis e crie uma nova referência para o arquivo usando o botão Procurar.... Se este for um aplicativo de banco de dados instalado, talvez seja necessário reinstalá-lo ou repará-lo.
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>


Apos aberto o formulário fica igual o meu e não funciona.

Você fez o que a mensagem sugeriu? Ou seja, foi na lista de referências e desmarcou a referência ausente?

Amigo você me ensinou corretamente eu fiz corretamente porem não funciona então resolvi criar um novo banco de dados e fiz a tabela depois coloquei o código funcionou perfeitamente .

Muito obrigado pela ajuda se eu não conseguir consertar devo abrir um novo tópico com o novo problema?

Tem aqui no repositório exemplos. Porque não aproveita-los? São uma fonte muito boa de conhecimento

Se a dúvida for referente a esse mesmo processo, pode ser por aqui mesmo, caso contrário, abrir outro tópico.
Se esse assunto já estiver resolvido, pode clicar no botão Resolvido.

Pelos vistos não está resolvido. por favor não coloquem questões diferentes no mesmo tópico.

Olhe este exemplo, por favor:

http://maximoaccess.forumeiros.com/t1423-busca-por-cbo-e-com-funcao-dlookup

Amigo Vieira, não tratamos de assuntos diferentes, a mensagem de erro que o colega recebeu, ainda era dentro do que ele estava tentando fazer, ou pelo menos, para ele pareceu ser. Por isso eu já o instruí a abrir novo tópico caso tenha dúvida sobre outro assunto

Amigo Criquio

Pelo que entendi o colega pediu um exemplo da caixa de combinação para efectuar busca num form. O exemplo atende. Desta foram ele pode ver aonde está a errar, por ele mesmo e descobrir novas possibilidades. É nosso dever clarificar.

Você me ajudou muito agora vou tentar resolver aqui vou deixar esse tópico em aberto se eu conseguir resolver coloco resolvido caso contrario volto.

Estou cansado já!!! Olha faço em um banco de dados em branco funciona normal salvo, quando abro novamente não funciona mais. O que eu faço agora pensava que era eu que não sabia fazer o Código mas agora....Obrigado pela ajuda ai.

Seu código estava certo e funcionou perfeitamente agora vou abrir um novo topico falando do meu novo problema valeu!