Notifications
Clear all

Excel X Access via ADO - Listar em combobox colunas diferent

6 Posts
3 Usuários
0 Reactions
1,973 Visualizações
depoisteconto
(@depoisteconto)
Posts: 183
Estimable Member
Topic starter
 

Galera,

Tenho uma tabela com dados assim:

Nomes - Data1 - Data2 - Data3
Nome1 - 01/01/2013 - 01/02/2013 - 01/03/2013
Nome2 - 02/01/2013 - 01/02/2013 - 01/03/2013
Nome3 - 02/01/2013 - 01/02/2013 - 01/03/2013

Tenho o campo Nome (combobox) onde seleciono o nome, então gostaria que em outro campo Data (combobox) fossem listados as datas 1,2 e 3.

At

 
Postado : 20/11/2012 2:52 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

depoisteconto,

Boa Noite!

Veja, por gentileza, esse pequeno exemplo que fiz de acesso a dados aoi Access, pelo Excel.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 20/11/2012 5:34 pm
depoisteconto
(@depoisteconto)
Posts: 183
Estimable Member
Topic starter
 

Wagner, obrigado pela resposta.

Esse tipo de consulta eu já tenho exemplos aqui.

Queria saber se tem como fazer seguindo o exemplo que postei.

Selecionar um nome através de um combobox e receber a lista de datas correspondentes aquele nome em outro combobox.

At

 
Postado : 21/11/2012 11:28 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Sim, claro!

Bem, coloquei o exemplo acreditando que você estivesse com dúvidas quanto à forma de acessar e mostrar os dados. Já que você passou por essa etapa, para fazer o que você quer, no evento Change do primeiro ComboBox onde tem os nomes, você faz um Select na tabela utilizando a cláusula WHERE de maneira que o filtro traga apenas as datas alusivas ao nome selecionado. Ou seja, por exemplo (supondo que o nome do campo alusivo aos nomes, na tabela Cad_Cli chama-se Clientes): WHERE Cad_Cli!Clientes = '" & ComboBox1.Value.

Com a consulta já no seu recordset basta você percorrer o mesmo até que o mesmo não esteja no final e adicionar os ítens ao combobox2.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 21/11/2012 1:53 pm
depoisteconto
(@depoisteconto)
Posts: 183
Estimable Member
Topic starter
 

Seria possível aplicar isso no exemplo anexo?

At

 
Postado : 21/11/2012 3:25 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Segue um ótimo site sobre SQL, procure analizar o conteudo:

SQL WHERE Clause
http://www.w3schools.com/Sql/sql_where.asp

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 21/11/2012 5:25 pm