[Resolvido]Movimentação De Registro Por Formulários

Boa Tarde Galera.

Tenho um Formulário (FRM_Carteira De Serviços) que contem uma LISTBOX com algumas colunas de informações (Código, Data, Texto...)
No evento Ao clicar 2X, eu consigo levar as informações para outro Formulário (FRM_Hora Mecanico) em uma outra LISTBOX.

PROBLEMA:

As informações da LISTBOX do FRM_Hora Mecanico, parece que não estão ali, pois para validar as informações vinda do FRM_Carteira De Serviços eu ainda tenho que clicar na LISTBOX.


CÓDIGOS VBA:
FRM_Carteira De Serviços

Private Sub Lista19_DblClick(Cancel As Integer)
DoCmd.OpenForm "FRM_Horas Mecânico"
End Sub



FRM_Horas Mecânico
Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
Me.Lista110.Value = Forms![FRM_Carteira De Serviços].Lista19.Value
Form.Refresh
End Sub

Para quem deseja levar informações de combobox ou caixa de texto por todo Access, Sujiro cria ruma variavel em um módulo.
Resolvi esse tópico dessa forma.

Abra o VBA e em qualquer módulo faça o seguinte.

Option Compare Database
Global 'nome variavel' As 'tipo da variavel'


Ao fazer isso voce está dizendo que a informaçao que voce colocar dentro da variavel a qualquer momento voce pode vir buscar. Sujiro colocar um nome de variavel pouco usual para que nao haja um erro, ou algo do tipo.

Após apenas escrever uma variavel em um módulo, voce pode adicionar qualquer valor.

entao digamos que voce tenha um formulario de pesquisa de cadastro, que ao selecionar um cadastro, abra entao um formulario unico com informacoes do cadastro escolhido.

fica assim:

FRM_CADASTRO GERAL
Sub form_load
'nome variavel' = meucampotexto
End sub

Pronto voce acabou de definir o valor da variavel, agora voce pode buscar essa informaçao por todo seu BD que ela será sempre a mesma.

Se alguem ver o tópico e testar, responde ai pra compartilhar.

vlw

Olá João Felipe,

Que bom que conseguiu resolver.
Obrigado pelo retorno, o fórum agradece.

Abraço