Preenchimento automático em formulário como fazer para aparecer na tabela

Amigos estou com o seguinte problema:

Criei um BD que estou colocando em anexo, onde fiz um formulário de cadastro com dois campos com preenchimento automático quando é selecionado um valor para preencher o campo Código Siconv. Os campos que devem ser preenchidos automaticamente são Ministério e Órgão. No formulário o preenchimento esta acontecendo, só que na tabela ficam em branco estes dois campos. Alguém pode me ajudar como faço para que esta informações também apareçam na tabela? Agradeço pela ajuda.

Olá veja se ajuda amigo!

Danilo ajudou obrigado, eu vi que foi usado vba e você criou outras duas caixas de texto. Tem como deixar só com as que tinha no meu BD ou tenho que conservar estas duas e apenas ocultar elas do meu formulário?

Olá claro que posso lhe dizer.

ao atualizar  listBox do seu formulário neste caso "Código Siconv"

coloquei este evento e adicionei também os campos da tabela que não estavam acoplados no seu formulário.

Código:


Private Sub Código_Siconv_AfterUpdate()
Me.TXTMINISTERIO = Me.Órgão_da_Proposta
Me.TXTORGAO = Me.Esfera
End Sub



Danilo ajudou obrigado, eu vi que foi usado vba e você criou outras duas caixas de texto. Tem como deixar só com as que tinha no meu BD ou tenho que conservar estas duas e apenas ocultar elas do meu formulário?

Ola amigo isso mesmo você deve manter os campos e pode sin oculta-los abraço sucesso!

Valeu, muito obrigado.

Danilo

Fiz algumas alterações de lay-out em um novo arquivo só que a rotina que você me passou eu não consegui fazer funcionar. Você pode me ajudar mais uma vez? Eu não consegui descobir onde eu errei. Obrigado

Olá meu amigo copie e cole este código no seu projeto!

Código:



Private Sub TxtMinistério_Secretaria_AfterUpdate()
Me.TxtCódigoSic = txt_CódigoSiconv
Me.TxtÓrgão = TxtENTEFEDERATIVO
End Sub


Muito Obrigado Novamente!! Esta funcionando.