[Resolvido]Manter as mesmas informações do Registro Anterior no Próximo

Prezados,

Criei um formulário de inclusão e gostaria que após terminar de preenche-lo e passar para o próximo registro, ele mantivesse as informações de alguns campos do registro anterior para que eu não precisasse digitá-las novamente. Obrigado.

Boa tarde.

Se as informações sempre serão as mesmas para todos, o modo mais fácil é ir na tabela de origem, e no campo referido, nas propriedades do campo, valor padrão, inserir o valor.

Mesmo que se abra um registro novo, esses valores já estarão no formulário ao ser aberto, ao ser carregado ou ao incluir um novo registro.

Isso é apenas uma simples ideia sem conhecer teu projeto e tuas necessidades.

Abraços e sucesso.

Ou, para casos mutáveis, uma forma pode ser criar variáveis no escopo do formulário,ou seja, logo no início dele, fora de qualquer evento:

Option Compare Database
Option Explicit
Dim vNome As String, vData As Date, vQtd As Double

No evento "Após atualizar" dos campos:

Código:

vNome = Me.txtNome
vData = Me.txtData
vQtd = Me.txtQtd

Cada linha para o seu respectivo campo. E no "Ao carregar" do formulário:

Código:

Me.txtNome = vNome
Me.txtData = vData
Me.txtQtd = vQtd

Silvio. Obrigado pela dica, mas os valores não serão os mesmos para todos os registros e sim para uma boa parte deles. A solução do Criquio tem tudo a ver com o que eu estou querendo. Criquio obrigado era isso mesmo que eu estava tentando fazer e não conseguia. Valeu!!!!!

Opa!!! deu certo não rsrsrs

fiz assim:

No evento ao carregar do formulario coloquei:

Dim vnomeEmpresa, vpublicoPlano, vparticipacaoPlano As String
Dim vabrangenciaPlano, vacomodacaoPlano As String

Me.nomeEmpresa = vnomeEmpresa
Me.publicoPlano = vpublicoPlano
Me.participacaoPlano = vparticipacaoPlano
Me.abrangenciaPlano = vabrangenciaPlano
Me.acomodacaoPlano = vacomodacaoPlano

e no evento apos atualizar de cada campo coloquei:

Private Sub abrangenciaPlano_AfterUpdate()
vabrangenciaPlano = Me.abrangenciaPlano

End Sub

coloquei apenas o exemplo de um dos campos.

da erro de compilação: Variavel não definida
So que ja revisei todas as variaveis e estão todas corretas. Tambem substitui
o dim por public, mas acontece o mesmo erro.

Alguma dica?