KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe vindt u de maximale of minimale waarde binnen een bepaalde datumbereik (tussen twee datums) in Excel?

AuteurSiluvia Wijzigingsdatum

In het dagelijks gebruik van data-analyse, vooral bij het werken met transactieregistraties of tijdreeksgegevens, moet u vaak de hoogste of laagste waarde bepalen binnen een specifieke periode. Stel bijvoorbeeld dat u een tabel hebt zoals in de onderstaande afbeelding, en u wilt de maximale of minimale waarde bepalen tussen twee datums – bijvoorbeeld van 1-7-2016 tot 1-12-2016. Dit is een veelvoorkomende vereiste bij het opstellen van rapportages over specifieke perioden, het vergelijken van maandelijkse prestaties of het volgen van pieken en dalen in uw gegevens. In dit artikel worden verschillende praktische oplossingen behandeld met behulp van Excel-formules, VBA-code en ingebouwde functies, zodat u snel en nauwkeurig de gewenste waarde kunt ophalen.

Een schermafbeelding van een Excel-tabel met datums en waarden om de maximum- of minimumwaarde binnen een datumbereik te berekenen

Maximum of Minimale waarde vinden in een bepaald Datumreeks met matrixformules

Een eenvoudige aanpak is het gebruik van matrixformules in Excel, waarmee u waarden kunt berekenen op basis van meerdere criteria—bijvoorbeeld door te controleren of datums binnen uw beperkte bereik vallen. Deze methode is ideaal voor gegevens van gemiddelde omvang en voor gebruikers die vertrouwd zijn met het invoeren van formules.

Stel dat uw werkbladlijst datums bevat in kolom A (A5:A17) en de bijbehorende waarden in kolom B (B5:B17), met de begindatum en einddatum van het bereik respectievelijk ingevoerd in cel B1 en D1.

1. Selecteer een lege cel waarin u het resultaat wilt weergeven (bijvoorbeeld E2).

Het Maximale waarde vinden tussen 1-7-2016 en 1-12-2016:

2. Voer de volgende formule in de geselecteerde cel in. Druk na het bewerken op Ctrl+Shift+Enter (niet alleen op Enter), zodat Excel de formule herkent als een matrixformule:

=MAX(IF((A5:A17=$B$1),B5:B17,""))

Deze formule controleert welke datums binnen uw begin- en einddatum vallen en gebruikt alleen de waarden uit de overeenkomende rijen om het maximum te berekenen.

Een schermafbeelding van het resultaat van het vinden van de maximale waarde binnen een datumbereik met behulp van een matrixformule in Excel

Het Minimale waarde vinden tussen 1-7-2016 en 1-12-2016:

3. Gebruik voor het minimum binnen dezelfde Datumreekseen vergelijkbare aanpak. Voer de volgende formule in (en bevestig opnieuw met)Ctrl+Shift+Enter):

=MIN(IF((A5:A17=$B$1), B5:B17, ""))

Deze formule werkt op dezelfde manier, maar retourneert het Minimale waarde dat voldoet aan uw datumcriteria.

Een schermafbeelding van het resultaat van het vinden van de minimale waarde binnen een datumbereik met behulp van een matrixformule in Excel

Opmerkingen:

  • In de bovenstaande voorbeelden is A5:A17 het bereik met uw datums, $B$1 de startdatum, $D$1 de einddatum en B5:B17 het bereik met de waarden die u wilt evalueren. Pas deze verwijzingen aan zodat ze overeenkomen met uw werkelijke gegevens.
  • Zorg ervoor dat de twee bereiken waarnaar u verwijst even lang zijn—anders kan de formule fouten opleveren.
  • Controleer dubbel of uw datumvermeldingen daadwerkelijk als datums zijn opgemaakt en niet als tekst, anders werkt de formule mogelijk niet zoals bedoeld.

Tips:

  • Als u werkt met Office 365 of Excel 2021 of nieuwer, kunt u de functies MAXIFS en MINIFS gebruiken voor eenvoudigere berekeningen op basis van criteria.
  • Als de formule onverwacht een 0 of een lege cel retourneert, controleer dan of uw datumreeks overlapt met de beschikbare datums en of er onopgemerkte lege cellen aanwezig zijn.

VBA-code: automatisch maximum of Minimale waarde vinden in een Specifieke datum bereik

Voor gebruikers die werken met grote datasets, deze taak vaak moeten herhalen of automatisering in rapportages zoeken, biedt een VBA-macro een efficiënte oplossing om het maximum of Minimale waarde binnen een gekozen Datumreeks te vinden. Met VBA kunt u de gebruiker vragen om de relevante bereiken te selecteren en de datums in te stellen, wat ideaal is voor dynamische toepassingen of geavanceerde workflow-integratie.

1. Ga naar Ontwikkelaar > Visual Basic. Klik in het VBA-editorvenster dat verschijnt op Invoegen > Module en plak vervolgens de volgende code in de nieuwe module:

Sub FindMaxMinInDateRange_Robust()
    Dim ws As Worksheet
    Dim dateRange As Range, valueRange As Range
    Dim startCell As Range, endCell As Range
    Dim startDate As Date, endDate As Date
    Dim i As Long
    Dim d As Date, v As Variant
    Dim hasHit As Boolean
    Dim maxV As Double, minV As Double
    Const TITLE As String = "KutoolsforExcel"
    
    On Error GoTo FailFast
    
    Set ws = ActiveSheet
    
    
    Set dateRange = Application.InputBox("Select the DATE range:", TITLE, Type:=8)
    If dateRange Is Nothing Then Exit Sub
    Set valueRange = Application.InputBox("Select the VALUE range (same rows as date range):", TITLE, Type:=8)
    If valueRange Is Nothing Then Exit Sub
    
    If dateRange.Rows.Count <> valueRange.Rows.Count Then
        MsgBox "Date range and value range must have the SAME number of rows.", vbExclamation, TITLE
        Exit Sub
    End If
    
   
    Set startCell = Application.InputBox("Select START date cell:", TITLE, Type:=8)
    If startCell Is Nothing Then Exit Sub
    Set endCell = Application.InputBox("Select END date cell:", TITLE, Type:=8)
    If endCell Is Nothing Then Exit Sub
    
    If Not IsDate(startCell.Value) Or Not IsDate(endCell.Value) Then
        MsgBox "Start/End cell must contain valid dates.", vbExclamation, TITLE
        Exit Sub
    End If
    
    startDate = CDate(startCell.Value)
    endDate = CDate(endCell.Value)
 
    If startDate > endDate Then
        Dim tmp As Date
        tmp = startDate: startDate = endDate: endDate = tmp
    End If
    

    For i = 1 To dateRange.Rows.Count
        If IsDate(dateRange.Cells(i, 1).Value) Then
            d = CDate(dateRange.Cells(i, 1).Value)
            If d >= startDate And d <= endDate Then
                v = valueRange.Cells(i, 1).Value
                If IsNumeric(v) And Not IsEmpty(v) Then
                    If Not hasHit Then
                        maxV = CDbl(v): minV = CDbl(v)
                        hasHit = True
                    Else
                        If CDbl(v) > maxV Then maxV = CDbl(v)
                        If CDbl(v) < minV Then minV = CDbl(v)
                    End If
                End If
            End If
        End If
    Next i
    
    If hasHit Then
        MsgBox "Max value in range: " & maxV & vbCrLf & _
               "Min value in range: " & minV, vbInformation, TITLE
    Else
        MsgBox "No rows matched the date range (or values were non-numeric).", vbExclamation, TITLE
    End If
    Exit Sub

FailFast:
    MsgBox "Something went wrong: " & Err.Description, vbExclamation, TITLE
End Sub

2. Klik op de knop Uitvoeren-knopin de VBA-editor (of druk op)F5) om de macro uit te voeren. Volg de instructies om de bereiken voor datum en waarde te selecteren en de begin- en einddatum in te voeren. Het resulterende maximale en minimale waarden voor uw specifieke datuminterval worden weergegeven in een dialoogvenster.

Tips:

  • Zorg ervoor dat de geselecteerde datum- en waardebereiken evenveel rijen bevatten en exact met elkaar overeenkomen.
  • Deze aanpak is vooral handig bij het verwerken van uitgebreide lijsten of het automatiseren van herhaalde berekeningen van maximum- en minimumwaarden op basis van veranderende criteria.
  • Als er een leeg of ongeldig bereik is geselecteerd, of als de datuminvoer niet correct is opgemaakt, levert de code mogelijk geen geldig resultaat op—controleer uw selecties dubbel voordat u uitvoert.

Andere ingebouwde Excel-methoden: gebruik een draaitabel om maximum/minimum te filteren en weer te geven per Datumreeks

Als u liever geen formules of code gebruikt, biedt de functie Draaitabel van Excel een interactieve, formulevrije methode om gegevens op datum te filteren en samenvattende waarden zoals het maximum of minimum weer te geven. Deze oplossing is ideaal voor gebruikers die gegevens willen verkennen, rapporten willen genereren of eenvoudig criteria willen aanpassen via een grafische interface.

1. Selecteer uw tabel (inclusief zowel datums als waarden), ga vervolgens naar het tabblad Invoegen en klik op Draaitabel.

2. Selecteer in het dialoogvenster Draaitabel maken waar u de draaitabel wilt plaatsen en klik op OK.

3. Sleep in het deelvenster Draaitabelvelden het veld Datum naar het gebied Rijen en het veld Waarden (het veld waarvoor u het maximum of minimum wilt vinden) naar het gebied Waarden. Standaard wordt Som weergegeven; klik op het veld in Waarden, kies Waarde Veldinstellingen en wijzig dit indien nodig in Max of Min.

4. Om te filteren op een specifieke datumreeks, klikt u op de vervolgkeuzelijst bij de rijlabels voor het Datum-veld, kiest u Datumfilters > Tussen…, voert u uw begin- en einddatum in (bijvoorbeeld van)2016/7/1 tot 2016/12/1) en klikt u op OK.

De draaitabel toont nu de maximale waarde of Minimale waarde voor elke datum binnen uw Beperkt bereik. Als u alleen de enkele hoogste of laagste waarde over dat bereik nodig hebt, kunt u het samengevatte resultaat verder filteren of visueel doornemen.

Opmerkingen:

  • Zorg ervoor dat alle cellen in de kolom Datum echte datums bevatten (geen tekst). Gemengde opmaak kan ertoe leiden dat filters rijen overslaan.
  • Als de brongegevens veranderen, klikt u met de rechtermuisknop op de draaitabel en kiest u Vernieuwen om de resultaten bij te werken.
  • Afhankelijk van uw lay-out groepeert Excel datums mogelijk per maand, kwartaal of jaar. Klik indien nodig met de rechtermuisknop op een datum in de draaitabel en kies Groepering opheffen(of)Groeperen… om het gewenste niveau in te stellen).
  • Voor zeer grote datasets kunt u de draaitabel op een Nieuw werkblad plaatsen om de leesbaarheid en prestaties te verbeteren.

Tips:

  • Voeg een Segmentatietoe voor het Datumveld (Analyseren > draaitabel >)Segmentatie invoegen) om bereiken interactief aan te passen.
  • Hebt u één enkele maximum- of minimumwaarde nodig voor het volledige filterbereik? Sorteer na het filteren de kolom Waarden, of voeg een tweede Waardenveld toe en schakel dit over naar Max/Min.
  • Combineer met een draaigrafiek voor een visuele samenvatting die automatisch wordt bijgewerkt zodra je filters toepast.

Deze methode voorkomt handmatige formule-invoer en maakt dynamische interactie mogelijk – ideaal voor presentaties of scenario’s met meerdere gebruikers. Overweeg de formule- of VBA-aanpakken voor sterk aangepaste uitvoer of batchautomatisering over meerdere werkbladen.

Gerelateerde artikelen:

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan…
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...

Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

  • Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
  • Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!

Alle Kutools-add-ins in één installatieprogramma.

Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
  • Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
  • Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
  • 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
  • Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins