[Resolvido]O que tem de errado no comando vba?

Ola amigos, Postei dois bancos apenas para eu entender o que está acontecendo.
O bd teste1 é de venda, e tem um botão pesquisar no subformulario que serve para buscar produtos e esta funcionando normalmente.
Mas o bd teste 2 é de montar orçamentos e tem a mesma ideia e comandos de busca do teste 1. Só que dá erro
Não consigo descobrir a falha, Pois fiz os dois com a mesma ideia
Me digam onde esta o erro no teste 2
e se puderem consertar eu agradeço.
fico no aguardo.   

Claudio

Abri os dois BD e verifiquei que cada botão pesquisar abre cada um, o seu formulário.

Não entendo o que estaria errado.

Explique o que deveria acontecer quando aperta o botão Pesquisar do bd teste2.


Noob

Dou 2 Clicks no produto desejado e deveria ser lançado no meu orçamento, mas dá erro
Já no teste 1 funciona normalmente. Sendo que os 2 bd tem a mesma ideia

Tai o banco2

Estude os códigos, pois fiz mudificações.

Não vou explicar, porque sei  que é inteligente !!!      

Abraços

Noob

Ola amigo, perfeita sua resposta. antes de fechar o topico, gostaria de saber se a mudança foi feita apenas na parte do comando que dava erro ou você mexeu em algun outro lugar. Pois eu peguei o teste 2 e fiz a mudança para ficar do jeito que vc fez e funcionou em um registro, mas se eu clicar para um novo orçamento e quando vou buscar os produtos da uma msg de erro:

"erro em tempo de execução '3201'
não é possivel adicionar ou alterar registros, pois é necessario que eles tenham
um registro relacionado na "tbl_OrçProd".

verifiquei as relações e ta do mesmo jeito que a sua. Faça o teste:

Veja

Você tem 1 formulário principal e um subformulário.

Se não colocar um registro no form principal, não poderá adicionar registros no subform.

Noob

Ola amigão, estou fazendo isso. você testou?. basta clicar no botão novo registro no formulario principal e preencher os campos e quando vc tentar colocar um produto com esse metodo de busca, dá esse erro. faça um teste

Amigão

Você passou batido em um código no exemplo que enviei

Dê uma olhada ai, tente descobrir qual.

Antes disso use a lógica:

msg de erro: escreveu:
"erro em tempo de execução '3201'
não é possivel adicionar ou alterar registros, pois é necessario que eles tenham
um registro relacionado na "tbl_OrçProd".

Como eu disse:

Se não colocar um registro no form principal, não poderá adicionar registros no subform.

Será que esse registro foi salvo, antes de adicionar um registro no subformulário?   

Veja no código do exemplo enviado.

Noob

Ola amigo sou novo no access, não consigo descobrir o código errado, pois comparando o meu com seu exemplo, eles estão indenticos.
se vc poder escrever so a minha parte que está errada, fico muito grato.  

Certo, meu amigo.

Veja o código  do evento aoClicar  do botão de pesquisa.
No botão do teu aplicativo tem 1 linha de código, para abrir o formulário.
No código do meu exemplo tem 2 linhas de código.
Antes de abrir o formulário, ele faz uma operação.

Noob

Ola amigo. agora entendi meu erro. tudo resolvido
obrigado pela atenção. 

Ótimo Claudio

Valeu pelo retorno

Boa sorte!


Noob