Rogerfba
27/04/2010 - 23:35
Pessoal Boa noite!
Olha só, sou iniciante no Access, esse é meu primeiro acesso no Fórum, estou desenvolvendo um bd que tem um formulário com um subformulário, quando eu digito a matrícula do colaborador todos os dados dele é carregado no formulário, para eu lançar os EPI para esse colaborador no subformulário preciso da matrícula dele a cada linha lançada. Ai me deparei com o seguinte problema: gostaria que, ao digitar a matrícula do colaborador no campo matrícula no formulário principal e teclar "enter" o número fosse copiado para campo matrícula no subformulário a cada vez que esse campo recebesse o focu, tem como fazer isso?
Eu até que conseguir fazer usando esse comando:
No campo matrícula do formulário, ao receber focu eu coloquei:
Me.[Matrícula].SetFocus
DoCmd.RunCommand acCmdCopy
No campo matrícula do subformulário, ao receber focu eu coloquei:
Me.[Matrícula].SetFocus
DoCmd.RunCommand acCmdPaste
Mas da um erro ao entrar no formulário: Erro em tempo de execução '2046', O comando ou ação 'Colar' não está disponível agora, depois repete com o nome 'Copiar'. Se eu clicar em fim ele faz o que eu quero que é copiar o conteudo de um campo para outro.
Tem como fazer de outra forma?
Espero que tenha esplicado direitinho e que alguém possa mim ajudar, desde já agradeço.
MrMALJ
28/04/2010 - 12:34
Em vez disso repasse o valor referenciando o caminho onde o objeto estará, pelo que percebi os dois campos se chamam matricula, então vou supor que seus formularios sejam "prin" e "subform" respectivamente então por exemplo na propridade de evento após atualizar do matricula do prin faça um código assim:
CODE
forms!prin!subform!matricula.value= forms!prin!matricula
Isso deve resolve, aguardo retorno.
Rogerfba
28/04/2010 - 21:50
Valeu MrMALJ, mas não deu certo não, você pode mim ajudar de alguma outra forma? tem como eu impedir que as mensagens de erro apareça?, se elas não aparecer funciona legal. Aguardo respostas
Leandro Abbade
28/04/2010 - 23:29
Boa noite amigo,
Tente usar:
CODE
DoCmd.SetWarnings False
Rogerfba
29/04/2010 - 23:17
Boa noite Leandro
Esse cod que você enviou não deu certo, ou eu estou colocando no lugar errado.
Outra coisa, como faço para deixar o comando copiar e colar ativo quando eu abro um form, estou usando esse comando (DoCmd.RunCommand acCmdCopy), mas da uma mensagem de erro informando que o comando copiar não está disponível.
Agradeço desde já.
Rogerfba
09/05/2010 - 19:34
QUOTE(Leandro Abbade @ 28/04/2010 - 23:29)

Boa noite amigo,
Tente usar:
CODE
DoCmd.SetWarnings False
Leandro, boa noite!
Como te falei antes, essa opção não deu certo, onde mesmo devo colocar esse código?
Aguardo respostas.
Leandro Abbade
09/05/2010 - 21:22
Boa noite,
Tente colocar no inicio da função.
Esta é uma versão simplificada de nosso conteúdo principal. Para ver a versão completa com maiores informações, formatação e imagens, por favor
clique aqui.