[Resolvido]trazer dados de um formulário de pesquisa para outro formulário

Prezados,

Estou desenvolvendo um formulário o qual tem um campo que precisa ser alimentado com dados pre-definidos em uma tabela.
O caso prático é o seguinte: no formulário 1, tenho o campo código do produto. Ao lado deste campo, criei um botão que abre um formulário de pesquisa (formulário 2), no qual o usuário filtra o item desejado.
Assim, tendo localizado o item, o que desejo fazer é que o usuário possa dar um duplo clique ou marcar o registro e clicar num botão "selecionar" e as informações daquele registro ser transferida para o formulário 1, preenchendo automaticamente o campo e fechando o formulário 2.
Alguém pode me dar uma ajuda?

Olá Salomão,

Você poderia tentar algo + ou - assim:

Imaginando que você tem no formulario1 um campo chamado CodProduto. No formulario2 também há um campo chamado CodProduto. Para abrir o formulario2 e transferir o CodProduto para o formulario1:


Private Sub NomeDoBotao_Click()
DoCmd.OpenForm "Formulario2"
Forms!Formulario2.Form.CodProduto = Me.CodProduto
End Sub

Nivaldo.

Prezado Nivaldo,

Desde já agradecido pelas suas preciosas dicas, mas o que estou tentando criar vai um pouco mais além.
O que desejo é criar uma rotina que:
(1) se o usuário souber o código do produto, por exemplo, este alimenta diretamente no campo codproduto;
(2) se o usuário não sabe o código, este tenha a possibilidade de fazer uma pesquisa, utilizando algumas chaves de procurar, como por exemplo, a descrição do produto. Tendo encontrado o produto desejado, o bastante seria fazer a seleção ou marcação no formulário de pesquisa, clicar num botão ou dá um duplo clique sobre o registro, e o código do produto ser transportado, automaticamente, para o campo inicial (formulário 1), sendo fechado o formulário de pesquisa.

Amigo Salomão, no repositório de exemplos do forum tem um exemplo mais ou menos da maneira que necessita. Dê uma olhadinha lá.

Oi Salomão,

Uma idéia:

Você poderia colocar no lugar de um botão, uma caixa de combinação para pesquisar o Cadastro de Produtos. Nesse caso. não teria a necessidade de se abrir outro formulário para a pesquisa.

Nivaldo.