Vba: "anders van" gebruiken in autofilter

U kunt het <>- symbool gebruiken om „niet gelijk aan“ weer te geven in een autofilter in VBA.

Hier is een gebruikelijke manier om dit in de praktijk te doen:

 SubFilterNotEqualTo ()

Range(" A1:C11 ").AutoFilter Field:=2, Criteria1:=" <>Center "

End Sub

Deze specifieke macro filtert alle rijen in het bereik A1:C11 waarbij de waarde van de tweede kolom niet gelijk is aan „Midden“.

Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.

Voorbeeld: gebruik „Anders van“ in AutoFilter in VBA

Stel dat we de volgende gegevensset in Excel hebben die informatie bevat over verschillende basketbalspelers:

Stel dat we de gegevensset willen filteren, zodat alleen rijen worden weergegeven waarvan de waarde in de kolom Positie niet gelijk is aan ‚Midden‘.

We kunnen hiervoor de volgende macro maken:

 SubFilterNotEqualTo ()

Range(" A1:C11 ").AutoFilter Field:=2, Criteria1:=" <>Center "

End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Houd er rekening mee dat de gegevensset is gefilterd om alleen rijen weer te geven waarvan de waarde in de kolom Positie niet gelijk is aan ‚Midden‘.

Houd er rekening mee dat u ook rijen kunt filteren waarin de kolomwaarde Positie niet gelijk is aan meer dan één waarde.

U kunt bijvoorbeeld de volgende macro maken om de gegevensset te filteren, zodat alleen rijen worden weergegeven waarvan de waarde in de kolom Positie niet gelijk is aan ‚Midden‘ of ‚Bewaking‘:

 SubFilterNotEqualTo ()

Range(" A1:C11 ").AutoFilter Field:=2, Criteria1:=" <>Center ", Criteria2:=" <>Guard "

End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Ik heb gemerkt dat de gegevensset is gefilterd om alleen rijen weer te geven waarvan de waarde in de kolom Positie niet gelijk is aan „Midden“ of „Bewaking“:

Opmerking : u kunt hier de volledige documentatie voor de VBA AutoFilter- methode vinden.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

VBA: autofilter gebruiken met meerdere criteria
VBA: draaitabellen filteren
VBA: filters wissen