Vba: dagen tussen twee datums berekenen

U kunt de volgende basissyntaxis in VBA gebruiken om het aantal dagen tussen twee datums te berekenen:

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

Dit specifieke voorbeeld berekent het aantal dagen tussen datums in de overeenkomstige cellen in de bereiken A2:A7 en B2:B7 en retourneert de resultaten in het bereik C2:C7 .

Houd er rekening mee dat het argument „D“ in de functie DateDiff aangeeft dat we het datumverschil in dagen willen berekenen.

Raadpleeg de VBA-documentatiepagina voor een volledige lijst met eenheden die u kunt gebruiken voor het datumverschil.

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

Voorbeeld: Bereken dagen tussen datums in VBA

Stel dat we de volgende twee kolommen met datums in Excel hebben:

Stel dat we het aantal datums tussen de startdatum en de einddatum in elke rij willen berekenen en de resultaten in kolom C willen weergeven.

We kunnen hiervoor de volgende macro maken:

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

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

Het aantal data tussen elke startdatum en elke einddatum wordt aangegeven in kolom C.

Aanvullende bronnen

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

Datums vergelijken in VBA
Hoe een kolom te filteren met VBA
Hoe waarden alfabetisch te sorteren in VBA