[Resolvido]Atualizar valor da combobox com base no último registro inserido na tabela

Olá, pessoal!
Estou desenvolvendo um sistema em Access para uma pequena empresa de comércio com necessidades específicas, na qual eu trabalho.

Sou novato em Access e VBA e gostaria de receber um direcionamento lógico para o que eu estou tentando fazer, mas não consigo encontrar uma solução:

Tenho um formulário onde são cadastradas as vendas, chamado formVendaNova.
Neste formulário há o campo Cliente, que é uma combobox chamada comboCliente, com as escolhas possíveis puxadas de uma consulta, com colunas ID e nome do cliente (ID oculta).
Ao lado do comboCliente há um botão Novo Cliente (cmdNovoCliente), por praticidade mesmo, para não precisar ir em outra tela cadastrar o cliente antes de cadastrar a venda.
O botão leva para o formClienteNovo, onde se cadastram os clientes.

O que eu gostaria de fazer é cadastrar um novo cliente a partir do botão Novo Cliente no formVendaNova, e ao fechar o formClienteNovo, o comboCliente automaticamente atualizar o valor para o último cliente cadastrado.

É possível fazer isso?

Agradeço desde já.

Izolan

Bom dia, e bem-vindo ao fórum
Coloque no acontecimento AoEntrar na CboNrCliente

dim rst as dao.recordset
Set rst = Me.Recordset.Clone
rst.movelast
Me.Bookmark = rst.Bookmark
set rst=nothing

Olá, Alexandre Neves!
Obrigado pelas boas vindas e pela prontidão em responder.

Fiz o sugerido e a princípio não funcionou. Imagino que seja porque o comboCliente puxa os dados por meio de uma consulta, e não direto da tabela.

Eu não gostaria que o formulário carregasse automaticamente o último cliente.

Eu talvez não tenha explicado direito o que eu gostaria de fazer.

O formClienteNovo poderá ser acessado por dois locais diferentes:
1. a partir da tela de consulta de clientes (ainda não criada); e
2. a partir da tela para cadastrar uma nova venda (clicando no botão novo cliente)

Quando o método 2 fosse usado, o cliente seria cadastrado e, ao voltar pra tela de venda, o campo cliente seria automaticamente preenchido.

Anexo o bd para estudo.

Agradeço novamente!

Eu usei um código no botão salvar do formClienteNovo que atualizou o combo no formVendaNova.
Porém os campos que devem ser preenchidos automaticamente não foram preenchidos.

Código:

Private Sub cmdSalvarCliente_Click()
On Error GoTo Err_cmdSalvarCliente_Click

    DoCmd.RunCommand acCmdSaveRecord

If CurrentProject.AllForms("FormVendaNova").IsLoaded Then
    Forms![FormVendaNova]!comboCliente.Requery
    Forms![FormVendaNova]!comboCliente.Value = Me!CampoIDCliente
    DoCmd.Close
Else
    DoCmd.GoToRecord , , acNewRec
End If
    

Exit_cmdSalvarCliente_Click:
    Exit Sub

Err_cmdSalvarCliente_Click:
    MsgBox Err.Description
    Resume Exit_cmdSalvarCliente_Click
    
End Sub

No formulário de venda
passe o procedimento
Private Sub comboCliente_AfterUpdate()
para
Public Sub comboCliente_AfterUpdate()

no formulário de registo de cliente adapte para este código
Private Sub Form_Close()
If CurrentProject.AllForms("FormVendaNova").IsLoaded Then
Forms![FormVendaNova]!comboCliente = Me.CampoIDCliente
Forms![FormVendaNova].comboCliente_AfterUpdate
End If
End Sub

Funcionou perfeitamente! Problema resolvido.

Muito obrigado, Alexandre!

Amigos e amigas do Fórum!

Eu consigo pegar um valor existente "Form!Textbox1" e inserir normalmente em outro formulário "Form2!Textbox2"

Vejamos o código:

Forms![Form2]![txtUsuario] = Forms![Form1]![txtUsuario]

Como eu faço para inserir o valor existente do Form para o controle de uma Combox de outro formulário? Veja o que tentei.

Forms![Form2]![cbUsuario.Column(2)] = Forms![Form1]![txtUsuario]

Está dando errado! Como proceder?