[Resolvido]Povoar campo através de botao

Galera, minha duvida esta relacionada o fato de quando clicar no botao do frmprincipal, o frmregistro seja aberto ja com o campo referencia, preenchido com o numero "1".

Olá Tauron,
Deveria explicar melhor o que pretende.
Se pretende o valor pode defeito pode:


Para abrir formulário no botão:

Código:

DoCmd.OpenForm "frmRegistro", acNormal

Caso pretenda Filtro pode usar o WhereCondition ou OpenArgs.

Se tiver dúvidas aperte a tecla F1 com o código selecionado OpenForm

Abraço

Realmente Alvaro, minha explicacao nao ficou clara e nem objetiva.

A questao eh que havera varios botoes e cada um devera povoar o mesmo campo do frmregistro com um valor especifico:

ex.: caso clique no botao 1 o campo tera o valor 1. caso clique no botao 2 o campo tera o valor 2 e assim sucessivamente.

Peco-lhe desculpas pois estamos atarefados com uma questao do meu trabalho (perdemos parte de nossa rede) e nao elaborei bem minha postagem.

Olá, se compreendi bem, pode usar o OpenArgs.
Não se esqueça de passar o valor pretndido no Openform
No campo coloque no valor predefinido
=OpenArgs

Abraço

Me perdoe mas agora fiquei confuso.

No arquivo em anexo, o frmprincipal possui varios botoes e preciso que ao clicar em qualquer um deles, o formulario frmregistro sera aberto para novo registro, com o campo referencia ja preenchido com o numero do botao acionado. Sendo assim como passar o valor pretendido?

Se me permitem um pitaco....

Experimente algo assim...
Private Sub botao1_Click()
DoCmd.OpenForm "FrmRegistro", acNormal
DoCmd.GoToRecord , , acNewRec
Forms!FrmRegistro.Referencia.Value = 1
End Sub

Private Sub Botao2_Click()
DoCmd.OpenForm "FrmRegistro", acNormal
DoCmd.GoToRecord , , acNewRec
Forms!FrmRegistro.Referencia.Value = 2
End Sub

Olá a todos,
Claro que sim amigo Silvio,
Estou no celular, mas o pitaco é valido.
Aguardamos retorno do colega.
Abraço

Olá a todos,
Tauron, como ficou a situação?
Os membros do fórum merecem e agradecem o retorno.

Caso tenha resolvido, não se esqueça de dar o tópico como tal.
https://www.maximoaccess.com/t860-resolucao-de-topicos

Abraço

Tauron, ainda estamos aguardando o retorno.

Tive que abandonar este projeto e modifica-lo.

Não teste as sugestoes mas agradeço.