📊 SQL no Excel – Post 7: Removendo Duplicados com DISTINCT

 Muitas vezes, nas planilhas, temos valores repetidos.

Exemplo: várias pessoas podem ser da mesma cidade.
Se você quiser apenas a lista única de cidades, pode usar o comando DISTINCT.

---

🎯 Projeto do Dia: Listar apenas as cidades únicas dos clientes

1. Cenário

Tabela Clientes:

ID	Nome	Cidade	Idade
1	João Silva	São Paulo	32
2	Maria Souza	Rio de Janeiro	27
3	Carlos Lima	Belo Horizonte	41
4	Ana Santos	Curitiba	36
5	Fernanda Alves	São Paulo	29

Note que São Paulo aparece duas vezes.
Queremos listar apenas cidades únicas.

---

2. Código VBA com SQL

Abra o Editor do VBA (ALT + F11) e insira:

Sub CidadesUnicas()

    ' Declaração de variáveis
    Dim conn As Object
    Dim rs As Object
    Dim strSQL As String
    Dim ws As Worksheet

    ' Criar conexão
    Set conn = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.Recordset")
    
    ' Conectar ao arquivo Excel
    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";"
    
    ' SQL com DISTINCT
    strSQL = "SELECT DISTINCT Cidade FROM [Clientes$]"
    
    ' Executar consulta
    rs.Open strSQL, conn
    
    ' Criar aba de resultados
    Set ws = ThisWorkbook.Sheets.Add
    ws.Name = "Cidades_Unicas"
    
    ' Copiar resultados
    ws.Range("A1").CopyFromRecordset rs
    
    ' Fechar conexões
    rs.Close
    conn.Close
    
    MsgBox "Consulta concluída com sucesso!", vbInformation

End Sub

---

3. Explicando o Código 📝

• SELECT DISTINCT Cidade → seleciona a coluna Cidade, mas traz apenas valores únicos (sem repetição).

• Se você quiser várias colunas, pode usar algo como:

  SELECT DISTINCT Cidade, Idade FROM [Clientes$]
  

  Nesse caso, ele traria combinações únicas de Cidade + Idade.

---

4. Resultado esperado 📋

A aba Cidades_Unicas mostrará:

Cidade
São Paulo
Rio de Janeiro
Belo Horizonte
Curitiba

Repare que São Paulo aparece apenas uma vez.

---

📌 O que você aprendeu hoje?

✅ Como usar DISTINCT para remover duplicados.
✅ Como gerar listas únicas de valores no Excel.
✅ Como aplicar DISTINCT em uma ou mais colunas.

---

👉 No próximo post (Post 8), vamos aprender a usar COUNT e COUNT(DISTINCT) para contar registros — por exemplo, quantos clientes temos no total e quantas cidades diferentes.

---

📢 Dica extra

Assim como você elimina duplicidades nos seus relatórios com DISTINCT, eu também posso eliminar burocracias na sua contabilidade 📊.
Sou contador especializado em profissionais de serviços e posso ajudar você com:
✅ Abertura de empresas no Simples Nacional
✅ Acompanhamento contábil mensal
✅ Planejamento tributário para pagar menos impostos

💼 Entre em contato e organize sua vida financeira com praticidade!