caixa de combinação...
 
Notifications
Clear all

caixa de combinação com filtro

3 Posts
2 Usuários
0 Reactions
572 Visualizações
(@tulioxk)
Posts: 2
New Member
Topic starter
 

Boa tarde, gostaria de que uma caixa de combinação pudesse realizar um filtro simples no mês

Observem que do jeito que está, só retorna fevereiro.

:oops:

Private Sub ComboBox1_Change()
    On Error Resume Next
    Sheets(janeiro).Activate
    ActiveSheet.Range("$D$13:$K$45").AutoFilter Field:=3, Criteria1:="janeiro"
    
    Sheets(fevereiro).Activate
    ActiveSheet.Range("$D$13:$K$45").AutoFilter Field:=3, Criteria1:="fevereiro"
    
End Sub
 
Postado : 28/12/2016 1:54 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Experimente:

Private Sub ComboBox1_Change()
    On Error Resume Next
    ActiveSheet.Range("$D$13:$K$45").AutoFilter Field:=3, Criteria1:=ComboBox1.Value
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 28/12/2016 2:35 pm
(@tulioxk)
Posts: 2
New Member
Topic starter
 

Deu certo Reinaldoooooo!!!

ganhei o dia!

 
Postado : 28/12/2016 2:39 pm