Hoe alle datumcellen voor of na vandaag in Excel filteren?
In dit artikel onderzoeken we stap-voor-stap methoden om alle datumcellen die voor of na vandaag zijn te filteren in een Excel-werkblad. Het beheren en analyseren van tijdgevoelige gegevens is een veelvoorkomende vereiste, vooral bij het werken met logs, schema's, projectplanningen of vervaldatums. Efficiënt filteren op datums maakt het gemakkelijker om alleen de records waar het om gaat op een bepaald moment te bekijken, waardoor workflow en besluitvorming nauwkeuriger worden.
➤ Filter alle datumcellen voor of na vandaag met de filterfunctie
➤ Filter alle datumcellen voor of na vandaag met VBA-code
➤ Filter alle datumcellen voor of na vandaag met een Excel-formulehulpkolom
Filter alle datumcellen voor of na vandaag met de filterfunctie
De ingebouwde filterfunctie van Excel biedt een eenvoudige manier om datums te identificeren en weer te geven die voor of na vandaag liggen. Deze aanpak is visueel en vereist geen formules of VBA-code, waardoor het ideaal is voor gebruikers die een snelle manier zoeken om huidige datasets te filteren zonder formules of VBA te gebruiken.
1. Selecteer de kolom met uw datums, ga vervolgens naar het tabblad Gegevens en klik op Filter in de menubalk. U ziet filterpijlen verschijnen naast elke kolomkop, zoals hieronder wordt weergegeven:
2. Klik op de vervolgkeuzepijl in de datumkolomkop. Beweeg over Datumfilters en kies vervolgens Voor of Na, afhankelijk van uw behoeften. Bijvoorbeeld, selecteer Voor om datums te vinden die eerder zijn dan vandaag.
3. In de Aangepaste automatische filter dialoogvenster, klik op de Datumkiezer 
pictogram om de kalender te openen. Klik op de Vandaag knop om snel vandaag’s datum in te stellen.
4. Klik op OK. Excel zal uw gegevens filteren om alleen rijen te tonen waar de datum aan uw gespecificeerde voorwaarde voldoet (voor of na vandaag), zoals hieronder wordt weergegeven:
Deze methode is efficiënt voor tabellen van gemiddelde grootte en zeer toegankelijk, omdat er geen geavanceerde vaardigheden nodig zijn. Echter, u moet het proces handmatig herhalen als uw gegevens worden bijgewerkt of de criteria veranderen.
⚠️ Opmerking: Als uw datumkolom tekst bevat of niet is opgemaakt als juiste Excel-datums, kunnen filteropties onder Datumfilters niet verschijnen.
Filter alle datumcellen voor of na vandaag met VBA-code
Als u gegevens herhaaldelijk moet filteren of het proces voor grote datasets wilt automatiseren, is het gebruik van VBA-code een zeer praktische benadering. Dit is vooral nuttig voor analisten, rapportautomatisering of elke workflow waarbij filteren op basis van de huidige datum regelmatig terugkomt. Met VBA kunt u het filter in één klik toepassen, waardoor repetitief handmatig filteren wordt vermeden. Houd er rekening mee dat het gebruik van VBA vereist dat u uw werkmap opslaat met macro-ondersteuning (.xlsm-formaat), en sommige gebruikers hebben mogelijk beperkte toegang vanwege macro-beveiligingsinstellingen.
1. Druk tegelijkertijd op de toetsen ALT + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik in de editor op Invoegen > Module en plak vervolgens een van de volgende codeblokken in het modulevenster.
VBA-code: Filter alle datumcellen voor vandaag:
Sub FilterDateBeforeToday()
Dim xLastRow As Long
Dim xRg As Range
On Error Resume Next
Set xRg = Application.InputBox("Please select filtered column：", "KuTools for Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
ActiveSheet.AutoFilterMode = False
If xRg.Count = 1 Then Set xRg = xRg.CurrentRegion
xRg.AutoFilter 1, "<" & CDbl(Date)
Application.ScreenUpdating = True
End Sub
VBA-code: Filter alle datumcellen na vandaag:
Sub FilterDateAfterToday()
Dim xLastRow As Long
Dim xRg As Range
On Error Resume Next
Set xRg = Application.InputBox("Please select filtered column：", "KuTools for Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
ActiveSheet.AutoFilterMode = False
If xRg.Count = 1 Then Set xRg = xRg.CurrentRegion
xRg.AutoFilter 1, ">" & CDbl(Date)
Application.ScreenUpdating = True
End Sub
3. Nadat u een van de bovenstaande codes hebt gekopieerd en geplakt, drukt u op de F5-toets om deze uit te voeren. Er verschijnt een promptvenster waarmee u het bereik of de kolom met uw datums kunt selecteren. Zorg ervoor dat u alleen het relevante gegevensbereik selecteert en controleer of uw datums in het juiste Excel-datumformaat staan om fouten in de code te voorkomen.
4. Klik op OK om het filter uit te voeren. De rijen waar de datum voor of na vandaag ligt (afhankelijk van uw codeselectie) worden automatisch weergegeven, terwijl alle andere rijen verborgen blijven.
⚠️ Opmerking: VBA-gebaseerd filteren minimaliseert gebruikersinteractie en is geschikt voor zowel eenvoudige als geavanceerde behoeften. Sla echter altijd uw gegevens op voordat u VBA toepast en dubbelcheck uw geselecteerde bereik om essentiële rijen onbedoeld te voorkomen. Als u fouten tegenkomt, zorg er dan voor dat alle datumwaarden geldige datums zijn – niet-datumvermeldingen kunnen er voor zorgen dat de macro niet goed functioneert. Overweeg voor continu gemak om de macro toe te wijzen aan een knop voor één-klikfilteren.
Filter alle datumcellen voor of na vandaag met een Excel-formulehulpkolom
Een andere veelzijdige oplossing omvat het toevoegen van een hulpkolom met een Excel-formule om datums te markeren die voor of na vandaag liggen. Deze methode biedt grote flexibiliteit bij het definiëren en aanpassen van uw filtercriteria, waardoor het bijzonder geschikt is voor dynamische tabellen, complex filteren of wanneer u verdere analyse wilt uitvoeren met gemarkeerde gegevens. In tegenstelling tot plaatselijk filteren laat de hulpkolombenadering u rijen visueel markeren en vervolgens Excel's filtertool toepassen voor meer aangepaste controle. Deze techniek is eenvoudig te implementeren en uitstekend voor het bijhouden van deadlines, achterstallige taken of het monitoren van komende evenementen.
1. Voeg een nieuwe kolom in naast uw datumkolom. Voor illustratie, stel dat uw datums in kolom A staan, beginnend bij cel A2. Voer in de nieuwe hulpkolom (stel kolom B) de volgende formule in B2 om datums voor vandaag te markeren:
=A2<TODAY()De formule retourneert WAAR voor datums voor vandaag en ONWAAR anders.
Als u datums na vandaag (d.w.z. toekomstige datums) wilt markeren, gebruik dan deze versie in B2:
=A2>TODAY()2. Sleep de formule omlaag door de hulpkolom om alle rijen in uw dataset te evalueren. Als de gegevens beginnen vanaf rij 2, selecteert u simpelweg B2, beweegt u uw cursor naar de rechterbenedenhoek tot deze een klein zwart plusteken wordt, en dubbelklikt u om automatisch in te vullen voor alle rijen.
3. Nu uw hulpkolom WAAR of ONWAAR tegenover elke rij laat zien, selecteert u de kop van de nieuwe hulpkolom en schakelt u Filter in via het tabblad Gegevens (als deze nog niet is ingeschakeld). Klik op de vervolgkeuzepijl en filter op WAAR om alleen de rijen te bekijken die aan uw voorwaarde voldoen (ofwel voor of na vandaag, afhankelijk van de gebruikte formule).
💡 Tips: Om verwarring te voorkomen, overweeg dan uw hulpkolom te labelen volgens de filterlogica, zoals "Voor_Vandaag" of "Na_Vandaag." Als u moet filteren op specifieke voorwaarden (bijvoorbeeld alleen datums binnen een bewegend venster), pas dan de formule indien nodig aan. Controleer altijd of uw datumkolom alleen geldige Excel-datums bevat, omdat blanco of niet-datumvermeldingen de WAAR/ONWAAR-resultaten kunnen beïnvloeden.
ℹ️ Extra notities:
• Deze formulegebaseerde methode is bijzonder handig voor het bekijken, sorteren of verder analyseren van gegevens zonder het spoor bij te houden van de originele informatie. Het ondersteunt ook flexibele voorwaardelijke opmaak en samenvattingsberekeningen op basis van de WAAR/ONWAAR-waarden, hoewel het wel een extra kolom vereist. De transparantie en herbruikbaarheid van deze aanpak wegen vaak op tegen dit kleine ongemak.
• Als uw tabel vaak wordt bijgewerkt, past u de formule gewoon opnieuw toe of breidt u deze uit als er nieuwe rijen worden toegevoegd. Als sorteren of filteren niet werkt zoals verwacht, dubbelcheck dan op blanco of inconsistente vermeldingen in uw datumkolom en herbereken de hulpformules indien nodig (Formules > Bereken nu als berekening is ingesteld op handmatig).
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