Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
SELECT DISTINCT com...
 
Notifications
Clear all

SELECT DISTINCT com WHERE (Excel X Access)

 
2024 - VBA & Macros
Post Recente por depoisteconto 10 anos atrás
6 Posts
3 Usuários
0 Reactions
1,720 Visualizações
RSS
 depoisteconto
(@depoisteconto)
Posts: 183
Reputable Member
Topic starter
 

Caros, bom dia!

Para selecionar dados de uma tabela e carregar um combobox em um userform excel rodo a seguinte rotina:

sql = "SELECT DISTINCT [Campo1] FROM Tabela1 ORDER BY [Campo1];"
cx.Conectar
banco.Open sql, cx.Conn
banco.MoveFirst
With Me.Tipo
     .Clear
      Do
     .AddItem banco![Campo1]
      banco.MoveNext
      Loop Until banco.EOF
End With
banco.Close
cx.Desconectar

Quero colocar um WHERE porque só quero listar os dados do Campo1, cujo Campo2 estiver como "Ok".

Tentei aqui de algumas formas mas estou errando na sintaxe.

At

 
Postado : 24/06/2014 7:55 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Seria algo +/- assim
sql=SELECT Tabela1.Campo1 FROM Tabela1 WHERE (((Tabela1.Campo2)="Ok")) ORDER BY Tabela1.Campo1;

 
Postado : 24/06/2014 8:05 am
 depoisteconto
(@depoisteconto)
Posts: 183
Reputable Member
Topic starter
 

Seria algo +/- assim
sql=SELECT Tabela1.Campo1 FROM Tabela1 WHERE (((Tabela1.Campo2)="Ok")) ORDER BY Tabela1.Campo1;

Olá Reinaldo, obrigado por responder.

Ehh, não passou não.

Continuo pesquisando, se tiver qualquer outra contribuição fique a vontade para postar.

At

 
Postado : 24/06/2014 8:31 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

A sintaxe é essa, se "não passou" deve ser outro motivo, nome de campo ou nome da tabela ou valor ok maiúsculo e na tabela minúsculo ou .. ou ....

 
Postado : 24/06/2014 9:19 am
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

depoisteconto,

Boa Tarde!

Veja um pequeno exemplo que faz o que você quer.

Baixe o arquivo, faça a descompactação dos dois arquivos em uma mesma pasta e execute o arquivo Excel. Observe que na tabela só existem 6 produtos no Campo1, cujo Campo2 está com o conteúdo "Ok".

Arquivos.zip
 
Postado : 24/06/2014 11:47 am
 depoisteconto
(@depoisteconto)
Posts: 183
Reputable Member
Topic starter
 

depoisteconto,

Boa Tarde!

Veja um pequeno exemplo que faz o que você quer.

Baixe o arquivo, faça a descompactação dos dois arquivos em uma mesma pasta e execute o arquivo Excel. Observe que na tabela só existem 6 produtos no Campo1, cujo Campo2 está com o conteúdo "Ok".

Em tempo...

É isso mesmo Morel, obrigado.

Reinaldo, obrigado.

At

 
Postado : 26/06/2014 8:20 am
Forum Jump:
  Tópico Anterior
Próximo Tópico