Botão Criar uma cópia
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
Usuário Jarbas:
Bom dia,
Preciso criar um botão "Criar uma Cópia". Por exemplo: tenho o registro 1 no formulário e quero incluir o mesmo registro, só mudando o número da revisão.
Como eu poderia fazer esse botão?
Suporte:
Jarbas, experimente este código:
'seleciona o registro atual
DoCmd.RunCommand acCmdSelectRecord
'copia os dados
DoCmd.RunCommand acCmdCopy
'vai para o novo registro no formulário
DoCmd.GoToRecord , , acNewRec
'cola os dados no novo registro
DoCmd.RunCommand acCmdPaste
'limpa campo número da revisão
me!Revisão = null
'seleciona o foco para o campo revisão
me!Revisão.setFocus
Usuário Jarbas :
Muito Obrigado, Avelino!
O Botão funcionou!
Não há comentário |