Hoe kan ik het resultaat van een geavanceerd filter automatisch bijwerken in Excel?
Wanneer we de functie Geavanceerd Filter gebruiken, zullen we merken dat het gefilterde resultaat niet automatisch verandert wanneer de criteria worden aangepast. Dit vereist dat we de functie Geavanceerd Filter opnieuw toepassen om het nieuwe resultaat te krijgen. Maar, hebt u een goede en snelle truc om het resultaat van het geavanceerde filter automatisch bij te werken zoals in de volgende schermafbeelding wordt getoond in Excel?
Automatisch bijwerken van geavanceerd filterresultaat met VBA-code
Automatisch bijwerken van geavanceerd filterresultaat met VBA-code
De volgende VBA-code kan u helpen om het geavanceerde filterresultaat automatisch bij te werken wanneer u de criteria naar behoefte wijzigt. Doe het volgende:
1. Klik met de rechtermuisknop op het werkbladtabblad waarop u de gegevens automatisch wilt filteren, en kies dan Weergave Code uit het contextmenu. In het geopende venster Microsoft Visual Basic for Applications kopieert en plakt u de volgende code in de lege Module:
VBA-code: Automatisch bijwerken van geavanceerd filterresultaat:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A5:D21").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("A1:C3"), Unique:=False
End Sub
Opmerking: In de bovenstaande code: A5:D21 is het gegevensbereik dat u wilt filteren, A1:C3 is het criteriabereik waarop het filter is gebaseerd.
2. Sla daarna het codevenster op en sluit het. Nu, wanneer u de criteria in het criteriabereik wijzigt, wordt het gefilterde resultaat onmiddellijk automatisch bijgewerkt.
Ontdek de Magie van Excel met Kutools AI
- Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
- Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
- VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules gemakkelijk.
- Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen