Notifications
Clear all

Lista suspensa sem duplicar

9 Posts
4 Usuários
0 Reactions
1,571 Visualizações
(@shirohige)
Posts: 0
New Member
Topic starter
 

Boa noite.

Estou procurando na internet e não consegui nenhuma solução para meu problema. Gostaria de criar uma lista suspensa (combobox) sem duplicar os valores.

Eu tenho uma coluna(A) Regional, coluna(B) Cidade.

A coluna (A )duplica vários valores, e eu gostaria de adicionar apenas os valores sem duplicar em uma lista, existe alguma forma de fazer isso?

 
Postado : 25/02/2018 6:23 pm
(@fcarlosc)
Posts: 0
New Member
 

Segue código exemplo...disponibilizado pelo Reinaldo do Fórum...

Private Sub UserForm_initialize()
Dim i As Integer
'Popula ComboBox1
For i = 1 To Plan2.Cells(Cells.Rows.Count, "A").End(xlUp).Row
    UserForm1.ComboBox1.AddItem Cells(i, 1).Value
Next i    
End Sub
 
Postado : 25/02/2018 8:28 pm
(@wzxnet7)
Posts: 0
New Member
 

Bom dia.
Se a idéia é criar essa lista numa combobox que está num userform e não na planilha, creio que esse vídeo que eu gravei pode ajudá-lo.

https://www.youtube.com/watch?v=7ail9u-wvhg&t=560s

 
Postado : 26/02/2018 2:12 am
(@shirohige)
Posts: 0
New Member
Topic starter
 

Boa tarde.

eu não pretendo usar form, gostaria de criar a lista na célula do excel.

 
Postado : 26/02/2018 10:26 am
(@wzxnet7)
Posts: 0
New Member
 

Boa tarde.
Então sugiro postar um modelo de sua planilha.
Pode ser com dados fictícios, mas mesma estrutura.
Para anexar seu arquivo, clique em Responder e abaixo da janela de digitação localize a opção adicionar um anexo.

 
Postado : 26/02/2018 10:35 am
(@shirohige)
Posts: 0
New Member
Topic starter
 

Segue um exemplo. Muito obrigado pelo retorno

 
Postado : 26/02/2018 1:49 pm
(@wzxnet7)
Posts: 0
New Member
 

Boa tarde.
Veja se o que fiz te ajuda.

 
Postado : 26/02/2018 2:01 pm
(@deciog)
Posts: 0
New Member
 

shirohige , Bom Dia.

Confere se desta forma esta correta

Se foi útil, clique na mãozinha que fica do lado da ferramenta Citar, é uma forma de agradecimento

Se você Visitante Também gostou e foi útil pode clique na mãozinha que fica do lado da ferramenta Citar, é uma forma de agradecimento

Decio

 
Postado : 27/02/2018 4:55 am
(@shirohige)
Posts: 0
New Member
Topic starter
 

Obrigado a todos. Vou utilizar a solução passada por vocês.

 
Postado : 28/02/2018 4:50 am