[Resolvido]Executar Requery em qual evento

Prezados (as),

Boa tarde!

Como faço para que, assim que crio e salvo um novo registro, isso seja visto no formulário que está em outro computador?

Quando lanço um registro e vou buscar na combox do outro computador, a mesma localiza isso, mas ao clicar o Enter ela não trás registro nenhum. Só funciona quando fecho e abro novamente o form do outro computador.



Já grato pela atenção de todos!

Bom dia à todos,

Na realidade pesquisei mais sobre o assunto e descobri em outro tópico daqui uma solução


Private Sub Salvar_LostFocus()

Dim meuCod As Integer
'Aqui grava o código do registro atual na variável
meuCod = Me.Código
Me.Requery

'aqui clona o recordset (tabela) movendo para o primeiro registro
Me.RecordsetClone.MoveFirst

'procura no clone o registro atual
Me.RecordsetClone.FindFirst "[Código] = " & meuCod

'define o registro atual do formulário igual ao do clone
Me.Bookmark = Me.RecordsetClone.Bookmark


End Sub


Contudo não estou sabendo onde colocar o código. Fiz um teste colocando no LostFocus do botão salvar. Só que, para que funcione, o outro usuário deve seguir esse procedimento no form dele.

Em qual evento posso inserir esse código de maneira a, assim que eu finalizar um novo registro, em tempo real o outro usuário já possa visualizá-lo no computador dele?

Mudei o título para facilitar o entendimento do que busco

Bom dia,
poderá por no evento Ao receber o foco da combo:

Me.SuaCombo.Requery


Assim, todas as vezes que entrar na combo ela atualiza
os registros.

Bom dia Marcelo,

Inseri no evento do botão Salvar desta Maneira:

Private Sub Salvar_Click()

DoCmd.RunCommand acCmdSaveRecord

Call MsgBox("Registro Salvo!", vbInformation)

On Error Resume Next
Dim meuCod As Integer
'Aqui grava o código do registro atual na variável
meuCod = Me.Código
Me.Requery

'aqui clona o recordset (tabela) movendo para o primeiro registro
Me.RecordsetClone.MoveFirst

'procura no clone o registro atual
Me.RecordsetClone.FindFirst "[Código] = " & meuCod

'define o registro atual do formulário igual ao do clone
Me.Bookmark = Me.RecordsetClone.Bookmark


End Sub


Funciona em partes. Para o usuário do outro computador somente funciona obviamente quando ele clica no botão Salvar do form dele, aleatoriamente. Tenho 3 Combos de busca, vou testar inserir o código conforme a sua indicação.

Mas para o que pretende, não precisa desse monte de código não..
O que lhe apontei já cumpre certinho o que pretendes...

Acabei de testar exatamente como voce disse.

Ficou Me.Combinação158.Requery

Contudo, na combo ele acha o nome da pessoa (que é a busca), mas não localiza o registro.

Será que é pelo fato da combo estar localizada no cabeçalho do formulário?

Eu fiz um teste inserido um botão Atualizar no cabeçalho do formulário e funcionou com essa penca de código que fiz. Mas estou buscando um jeito do usuário não precisar clicar em nada.

Quando você salva o registro, ponha isso:

Abaixo do Requery, ponha:

Me.Refresh

Não funcionou como o esperado.

De qualquer forma, com o Botão atualizar funcionou. Vou deixar desta forma e passar para homologação. Se aceitarem assim então beleza.

Vou marcar como resolvido e lhe agradecer pela atenção e dicas!

Esqueci, abaixo do requery da combo,
Ponha o refresh também.

Me.Refresh

Beleza