Copiar dados de um campo num form para outro campo no subform

[Rogerfba]

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]

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:

forms!prin!subform!matricula.value= forms!prin!matricula

Isso deve resolve, aguardo retorno.

[Rogerfba]

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]

Boa noite amigo,

Tente usar:

DoCmd.SetWarnings False

[Rogerfba]

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]

Boa noite amigo,

Tente usar:

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]

Boa noite,

Tente colocar no inicio da função.