Guru do Excel e Power BI

Enviado: **29 Jun 2016 às 11:08**

Bom dia,
Gostaria de um exemplo simples de como carregar combobox com critério
Exemplo: Combobox1 Carrega os nomes de clientes que tenho em minha planilha digamos coluna 2
e na coluna 5 vou colocar o status de excluido ou ativo
mas preciso de um comando se for excluido não carregar nem aparecer o nome do cliente na combobox1 que carrega o nome

é ruim de postar a planilha que já esta ficando um pouco extensa, e oque preciso e do comando ou um exemplo de código
estou carregando para a combobox com o seguinte código:

With cmb_pesquisa
.Clear
.List = Range("B2:B" & Range("B2").End(xlDown).Row).Value
End With

Atenciosamente,

Enviado: **29 Jun 2016 às 20:13**

Para utilizar-se de criterio para carregar, não deve utiliza list/range;
utiliza algo +/- assim

Código: Selecionar todos

Dim QuantasLinhas As Long, Cont As Long
QuantasLinhas = Plan1.Range("A65000").End(xlUp).Row
For Cont = 2 To QuantasLinhas
    If Range("D" & Cont).Value = "Ativo" Then ComboBox1.AddItem Range("A" & Cont)
Next Cont

Enviado: **30 Jun 2016 às 10:29**

Resolvido!
Ficou muito bom, obrigado!

Guru do Excel e Power BI

Carregar Combobox com Critério

Carregar Combobox com Critério

Re: Carregar Combobox com Critério

Carregar Combobox com Critério