[Resolvido]Dúvida com autocompletar

Boa tarde pessoal!!!
Andei fazendo uma busca pelo fórum e os tópicos que encontrei com exemplos já são antigos e não consegui baixá-los....

Estou cirando um banco de dados de funcionários na empresa onde trabalho.
Já criei o formulário de cadastro de registros e quero usar um formulário idêntico para fazer pesquisas de registros.
Eu gostaria que, neste formulário, tivesse uma caixa de combinação com todos os nomes dos funcionários e que ao escolher um nome, os demais campos do formulário se autocompletassem, sem possibilidade de alteração.

Será que conseguem me ajudar?!
Agradeço desde já a atenção!!!!

Olá Tatiana, seja bem vinda ao nosso fórum.

a- Criar uma consulta sob a tabela dos funcionários.
b- Criar um formulário baseado nessa consulta.
c- Nesse formulário, colocar uma combox, com a origem de dados na consulta criada anteriormente.
d- Na combox, folha propriedades, evento após atualizar digitar o seguinte código:

DoCmd.ApplyFilter , "codfuncionario = " & Me!cbofuncionario.Column(0) ' codfuncionariochave primaria, cbofuncionario, onde vai buscar o nome desejado

Me!cbofuncionario = Null 'deixa a combo vazia, limpa.
DoCmd.RunCommand acCmdRefresh

E para que nenhum dado seja alterado, inserir o seguinte código na folha propriedades do formulário, evento no atual:

Dim ctl As Control
Dim StrName As String

For Each ctl In Me.Controls
Select Case ctl.ControlType
Case acTextBox, acListBox, acOptionGroup, acCheckBox
StrName = ctl.Name
Me(StrName).Enabled = False
End Select
Next ctl

Teste e nos informe.

Abraços.

Silvio

Amigo, obrigada pela resposta tão rápida!!

Vou testar e volto para dizer o resultado!!


EDITADO: desculpe a ignorância, mas a consulta precisa ter todos os campos da tabela?

EDITADO: consegui fazer a consulta....rs

Silvio, consegui fazer a consulta, mas estou com um pouco de dificuldade e altar os campos do código VBA...

Olá Tatiana,

Só um :pitaco

Você também pode usar o assistente da caixa de combinação para o que pretende:

Na primeira tela do assistente selecione a 3ª opção: "Encontre um registro no meu formulário baseado no valor que eu selecionei em caixa de combinação"

Deve resolver.

Nivaldo

Com essa última dica deu muito certo!!!
Obrigada pessoal!! Vocês são d+!!

Ola Tatiana;

Faltou apenas o Resolvido, desta vez eu coloco...

ops.. me desculpe!!

e obrigada!!