[Resolvido]Combobox chamar outra valores para outras caixas

Boa Tarde
Tenho um formulário com uma combobox que traz os dados dos clientes cadastrados, conforme anexo.
O colega Fernando Bueno me ajudou, me passando a forma como posso fazer isso acontecer, mas não sei onde estou errando, pois não esta acontecendo nada qdo eu troco o nome do cliente, alguém pode me ajudar.

Olá, acredito que você tenha todas as colunas na combo, certo? Por exemplo, se você tem 4 colunas na combo, sendo Código, Nome, DataNascimento e CPF, você tem o seguinte:

------------------------
COLUNA | DADO
------------------------
  0    |  Código
  1    |  Nome
  2    |  DataNascimento
  3    |  CPF
------------------------

Vamos supor que sua combo se chama cboDados e você tenha os campos txtNome, txtNascimento e txtCPF e quer popular esses campos com os dados das colunas da combo. Você faria:

Me.txtNome = Me.cboDados.Column(1) ' porque o nome está na coluna 1
Me.txtNascimento = Me.cboDados.Column(2) ' porque data de nascimento está na coluna 2
Me.txtCPF = Me.cboDados.Column(3) ' porque o CPF está na coluna 3

Ola Criquio

Então a forma que esta na minha planilha anexa é exatamente esta [como o Fernando Bueno me passou], mas não está executando nada :/ .
Ele me dispos uma planilha e na dele estava 100 % então eu só usei o mesmo conceito em uma nova, que é a em anexo mas ela não funciona. O que será q eu fiz de errado :/.

Bom, olha só: em primeiro lugar, o que você quer, pelo jeito, são os campos Contato e Telefone, certo? Mas a sua combo está com os campos Código e Cliente. Veja a instrução SQL dela:

SELECT [clientes].[Código], [clientes].[Cliente] FROM clientes ORDER BY [Cliente];

Mude para:

SELECT [clientes].[Contato], [clientes].[Telefone] FROM clientes ORDER BY [Contato];

Basta você clicar na combo, ir nas propriedades dela, aba Dados, linha "Origem da linha" e alterar isso lá.
Agora, na parte do código, se a sua combo tem duas colunas, ela tem as colunas 0 e 1 e não colunas 2 e 3 como está no código. O certo seria:

Me!Texto1.Value = Me.Combinação0.Column(0)
Me!Texto2.Value = Me.Combinação0.Column(1)

As colunas sempre começam do 0. Se você tem duas colunas, você tem 0 e 1. Se forem 4, as colunas são 0, 1, 2 e 3.

Uma última dica: como você terá as colunas Contato e Telefone, o certo será exibir a coluna Contato na combo, certo? Então vá na aba Formato nas propriedades da combo, linha "Largura das colunas" e inverta de 0cm;6,985cm para 6,985cm;0cm para que a combo exiba a lista de Contatos ao invés da lista de Telefones.

Bom dia Criquio / Daniela.

Exemplo corrigido, veja:

http://maximoaccess.forumeiros.com/t12998-resolvidoabrir-uma-tabela-dentro-de-outra

Olá Fernando/ Criquio, Bom Dia!

Realizei os testes das 2 formas fornecidas por vocês em um BD novo e funcionou perfeitamente, agora estou com um problema no meu BD original não está dando certo, ou ele aparece só o telefone ou só o nome do contato, estou anexando meu BD Original para que vocês possam dar uma olhada e ver oque está errado ]isso se possivel da parte de vocês é claro].

Bom, não sei a funcionalidade do seu formulario mas segui sua logica

A primeira estava certa, ela adiciona na tabela

A segunda estava errado a coluna, serve apenas para pesquisa.

Mas a 1º não está atualizando, e as funções estao corretas.
Só que na caixa de contato esta aparecendo telefone como posso corrigir?

Daniela boa noite.

Veja bem, a primeira busca na tabela registros e a segunda na tabela cadastro.

se deixar as duas buscando na tabela registro quando escolher o cliente em uma ja

muda a outra sozinho, lembrando que o contato do cadastro não bate com o contato

do registro.

O correto sera você deixar apenas uma, dependendo sua finalidade no formulario

Se precisar acrescentar dados na tabela deixe a primeira, se for apenas para pesquisa

deixe a de baixo.

Veja:

Esse foi criado um sub formulario buscando na mesma tabela registro veja...

Olhe o que se adapta melhor para finalidade que precisa.

Qualquer coisa de um alô ok.

Bom Dia Fernando

Obrigada pelo retorno,

O exemplo Banco Novo - 16.05_II.zip é o que eu vou adaptar para mim.

Mas explicando, no meu formulário só terá uma busca mesmo, eu coloquei opção 1 e opção 2 para vc ver que não deu certo na opção 1, o que eu quero usar mesmo é a opção 1 ou seja. Dentro do meu formulário terá uma Combobox que buscará os dados do cliente na tabela Cliente {se eu escolher Plastimetal} ele irá carregar os dados da Plastimetal e colocar na tabela registro, assim vinculando aquele cliente para aquele registro. Expliquei bem? se não expliquei pode me falar ok.

Boa tarde Daniela.

Então ja que os dados serão inseridos na tabela tera que ser o exemplo 1

No evento apos atualizar da combobox.

Me.SeuCampo1daTabela.Value=Me.SuaCombobox.Column(0)
Me.SeuCampo2daTabela.Value=Me.SuaCombobox.Column(1)

Lembrando que a contagem das colunas no access começa no 0

Se tiver alguma duvida de um alo ok.

Ufá,

Finalmente consegui com sua ajuda em Fernando, já estava ficando sem fios de cabelo aqui.

Deu certinho , muito Obrigada.

Att

Daniela.

Etapa Resolvida.

Que bom que deu certo, é assim mesmo as vezes ficamos de cabelo em pé rs

Agradecemos o retorno.