Hallo
Ik wil 1 macro de mogelijkheid hebben om een filter te activeren of te deactiveren
De filter zit in Cell O1, en moet als ik op de knop druk gaan filteren op waarde <1> ( als op dat moment de filter op <all> staat ) en omgekeerd. als de waarde <1> is geselecteerd, dan moet hij weer op <all> komen te staan als ik op de knop druk.
Ik zit er volgens mij wel bij in de buurt, maar krijg net de laatste stap niet voor elkaar. iemand een idee waar ik fout ga?
of kan wat ik wil helemaal niet?
Thanks
Humadgen
Ik wil 1 macro de mogelijkheid hebben om een filter te activeren of te deactiveren
De filter zit in Cell O1, en moet als ik op de knop druk gaan filteren op waarde <1> ( als op dat moment de filter op <all> staat ) en omgekeerd. als de waarde <1> is geselecteerd, dan moet hij weer op <all> komen te staan als ik op de knop druk.
Ik zit er volgens mij wel bij in de buurt, maar krijg net de laatste stap niet voor elkaar. iemand een idee waar ik fout ga?
Code:
Sub filter()
If ActiveSheet.AutoFilterMode Then
ActiveSheet.Range("$O$1:$O$151").AutoFilter Field:=1, Criteria1:="<>"
Else
ActiveSheet.Range("$O$1:$O$151").AutoFilter Field:=1
End If
End Sub
of kan wat ik wil helemaal niet?
Thanks
Humadgen