gustavopedrozo
-
Posts
1 -
Cadastrado em
-
Última visita
Tipo de conteúdo
Artigos
Selos
Fabricantes
Livros
Cursos
Análises
Fórum
Tudo que gustavopedrozo postou
-
Criar botão pesquisar utilizando dois critérios VBA
gustavopedrozo respondeu ao tópico de Zamboni_du em Microsoft Office e similares
@Zamboni_du Boa Tarde Caro Colega segue codigo ' altere os nomes de 'Combobox1" Textbox3" pelos nomes do seus textbox 'Altere as Sheets ('Vitorino') pelas Suas Sheets e as Lnhas de seu planilha tambem ! ActiveSheet.Range("$A$1:$T$2000").AutoFilter Field:=1, Criteria1:="=*" & ComboBox1.Value & "*" ActiveSheet.Range("$C$1:$T$2000").AutoFilter Field:=3, Criteria1:="=*" & TextBox3.Value & "*" listview1.ListItems.Clear Sheets("VITORINO").Select lin = 2 Do Until Sheets("VITORINO").Cells(lin, 1) = "" If Cells(lin, 1).Rows.Hidden = False Then Set li = listview1.ListItems.Add(Text:=Sheets("VITORINO").Cells(lin, 1).Value) li.ListSubItems.Add Text:=Sheets("VITORINO").Cells(lin, 2).Value
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais
