[Resolvido] Procurar/Localizar através de um FORM

Como faço para criar um formulário "Clientes" onde quando abri-lo no corpo(Detalhe) todos os campos aparecerão em branco e no Cabeçalho do Form terá um Campo onde será para digitar CPF do Cliente e com isso buscará/preencherá todos os outros campos?

Qual a finalidade do que pretende?

Para isto podes utilizar a função Dlookup...

Algo assim no evento após atualizar do campo CPF:

Código:


Private Sub CPF_AfterUpdate()
If DCount("Nome", "TblExemplo", "CPF ='" & Me.CPF & "'") = 0 Then
MsgBox "Não foi encontrado registro", vbCritical, "Aviso"
Else
Me.Nome = DLookup("Nome", "TblExemplo", "CPF ='" & Me.CPF & "'")
End If
End Sub


E assim para os Demais campos

Me.CampoEndereço = Dlookup("Endereco", "TblExemplo", "CPF ='" & Me.CPF & "'")

e por ai vai...

Cumprimentos.

Neste exemplo, o formulário está desvinculado da tabela.
Mas também pode ser usado em formulários vinculados.

Veja aqui

Abraços

Harysohn, obrigado pela dica.

Balem, seu exemplo encaixa no meu Form só que quando faço alteração nos registros e salvo as alterações não são efetuadas na Tabela, você pode me ajudar? Obrigado.

Ghunnar

Anexe o aplicativo, pra gente dar uma olhada

Agradeço a todos e obrigado pelo exemplo, na verdade não estava funcionando porque não tinha configurado corretamente os campos.

Obrigado.

Ghunnar

O Fórum agradece o retorno.

So faltou o resolvido, desta vez o coloco.

*** Não se esqueça de clicar no joinha da mensagem que o auxiliou.