Página 1 de 1

Carregar no listbox só os nomes ativos

Enviado: 31 Jan 2023 às 17:38
por batistathor
Boa tarde pessoas, venho aqui mas uma vez pedir ajuda , gostaria de uma rotina para carregar um listbox ,tenho na planilha uma coluna com nomes ativo e inativo , gostaria de quando carregar no listbox não carregasse os nomes inativos.. Desde de já agradeço a ajuda...

Re: Carregar no listbox só os nomes ativos

Enviado: 31 Jan 2023 às 19:46
por osvaldomp
Código: Selecionar todos
Sub CarregaListBox()
 Dim i As Long
  ActiveSheet.ListBox1.Clear
  For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
   If Cells(i, 2) = "ativo" Then ActiveSheet.ListBox1.AddItem Cells(i, 1)
  Next i
End Sub