Olá colegas,
Editei o código para que a Combobox2 carregasse as informações após preencher os dados da Combobox1, contudo ao carregar as informações no Combobox2 elas estão vindo duplicadas. Já realizei algumas pesquisas mas com o código que estou utilizando não encontrei nenhuma solução.
Segue o código.
Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Application.ScreenUpdating = False
Sheets("Clientes").Activate
Range("B2").Select
ComboBox2.Clear
Do While ActiveCell <> ""
If ActiveCell.Offset(0, 21).Value = ComboBox1.Text Then
ComboBox2.AddItem ActiveCell.Text
End If
ActiveCell.Offset(1, 0).Activate
Loop
Sheets("Matriz").Activate
End Sub
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Combobox com dados duplicados
-
- Acabou de chegar
- Mensagens: 4
- Registrado em: Sex Abr 16, 2021 2:42 am
-
- Acabou de chegar
- Mensagens: 4
- Registrado em: Sex Abr 16, 2021 2:42 am
Re: Combobox com dados duplicados
Olá meu nobre,
Segue planilha.
Se possível me dá um help com o filtro da listbox pois também estou com dificuldade.
- Anexos
-
- Desenvolvendo.rar
- (29.54 KiB) Baixado 139 vezes