[Resolvido]Código VBA para autopreenchimento

Boa tarde, como sou novo em VBA, estou com um problema que provavelmente é bem simples para uma pessoas mais experiente, no meu BD tem um uma combobox, chamada CB_Encarregado_Nome, cujo a origem de linha é uma pesquisa com que contem 3 campos da tabela, consegui criar uma caixa de texto, chamada Matrícula_encarregado, que puxa  as informações dessa combobox, até ai tudo bem, contudo gostaria que mais duas caixas de texto fossem atualizadas tb, a PATENTE e UNIDADE_ATUAÇÃO só que, contudo não estou sabendo digitar o código VBA da maneira correta pois estas duas últimas caixas de texto não preencher com as informações da origem da linha.

o que eu digitei é

Private Sub CB_Encarregado_Nome_AfterUpdate()
Me.Matrícula_Encarregado = Me.CB_Encarregado_Nome.Column(1)
Me.UNIDADE_ATUAÇÃO = Me.CB_Encarregado_Nome.Column(2)
Me.PATENTE = Me.CB_Encarregado_Nome.Column(3)
End Sub

contudo apenas o campo Matrícula_Encarregado que é preenchida o resto fica em branco.

se alguém puder me ajudar e dizer o que está errado.

Vou aproveitar disponibilizar o BD para análise.


Desde já agradeço e peço desculpas pelo incomodo.

na sua "CB_Encarregado_Nome" veja como está configurado a sequencia das informações desta combobox. isto pode ser visto na aba Dados abrindo a combobox no modo estrutura. Geralmente a chave primaria deverá aparecer na primeira coluna e esta deve ser a coluna acoplada. sendo assim:

SELECT [Cadastro de Encarregados].Código, [Cadastro de Encarregados].[Nome do Encarregado], [Cadastro de Encarregados].[Matrícula do Encarregado], [Cadastro de Encarregados].[Unidade de Atuação], [Cadastro de Encarregados].[Posto/Graduação]
FROM [Cadastro de Encarregados];

Na aba formato, o numero de colunas deve ficar setado em 5;
largura das colunas: 0cm;5cm;5cm;5cm;5cm

exatamente da forma que aparece ai acima.

como está conforme a SQL da CB_Encarregado_Nome:
coluna 0 Código
coluna 1 Nome do Encarregado
coluna 2 Matricula do encarregado
coluna 3 Unidade de atuação
coluna 4 Posto/Graduação

Dá pra entender?

Muito obrigado deu certo aqui, outro problema é que não tinha colocado o número de colunas em "4".

Desculpe o incomodo.

FELIPE
 FELIPE
    Felipe !!


Sinto dizer meu amigo, mas merece um puxão de orelhas!

Brincadeira !!

No exemplo que retornei a você, esta tudo certinho, com as colunas da combo corretas em seus lugares.

E disse para olhar isso.

Não esqueça do Resolvido no tópico

Como não houve retorno do criador do tópico,

dou o tópico por resolvido.

Se o autor desse tópico deixar mais algum tópico

sem retorno, serei obrigado a aplicar penalidades.