Carregar Combobox exibir ListBox

2024 - VBA & Macros

Post Recente por Miguel 70 10 anos atrás

3 Posts

2 Usuários

0 Reactions

727 Visualizações

RSS

Miguel 70

(@miguel-70)

Posts: 207

Estimable Member

Topic starter

Ola boa noite a todos leitores do planilhando,
Como fazer uma pesquisa rápida em uma lista?
Tenho na Plan2 no coluna D4 uma lista de nomes de pessoas. Como faço para digitar no combobox então exibir esta lista em ordem alfabética no listbox.
Achei este código parecido mas não consigo exibir no ListBox.

Private Sub UserForm_Initialize()
Dim linha As Integer
linha = 4
Do Until Plan2.Range("d" & linha).Value = ""
Me.ComboBox1.AddItem Plan2.Range("d" & linha).Value
linha = linha + 1
Loop
'Me.ListBox1.AddItem.Value = ComboBox1
End Sub

Obrigado

Postado : 01/06/2015 3:16 pm

srobles

(@srobles)

Posts: 231

Estimable Member

Miguel,

Não sei se compreendi o que vc procura, porém estou disponibilizando um modelo e, peço que veja se é isso o que procura ou não.
Se possivel, poste sua planilha aqui, para que possamos entender o quer e te ajudar melhor.
Qualquer coisa, estamos ai.

[]s

Espero ter ajudado.

Abs.

Saulo Robles

Postado : 08/06/2015 8:48 pm