Variável Temporária - copiar valor

Amigos, boa noite,
Estou com o seguinte problema, criei um sistema e preciso que na digitação de um campo de um formulário, o sistema salve esse valor, e ao abrir um subformulário, ele copie para lá esse valor. creio que como variavel temporária é a melhor forma.
Não estou conseguindo atribuir isso, algume poderia me ajudar a salvar e depois colar em um subformulário.

Desde já agradeço. Abraço !

Bom dia,

Não entendi bem a coisa de "abrir um subformulário", mas se o form onde está digitando o valor ainda está aberto quando voce abre o subform, basta que no botão que o abre atribuir o valor do campo do formulário atual para o campo do subformulário. Algo como:

Código:

DoCmd.Open "subForm"
Forms![subForm].campo = me.txtCampo

Isso supondo que voce vai abrir o subform através do formulário que digitou o primeiro valor.

Por outro lado, se voce vai abrir o subform depois de abrir o formulário depois de fechar o formulário 'principal', voce precisa criar uma variável num módulo. Eu gosto de usar uma varia "set" e uma "get" quando tenho que fazer algo assim. Crie um modulo e coloque o descrito abaixo neste modulo:

Código:

Dim strValores String

Function getValor() As String
    getValor= strValor
End Function

Function setValor(varValor As String)
    strValor= varValor
End Function

Ai quando terminar a digitação do campo vai usar, no evento após atualizar:

Código:

setValor(me.txtCampo)

Ai quando abrir o subform voce atribui ao campo "campo" o valor, usando a função "get" acima:

Código:

me.campo = getValor

Abraço.