Hoe networkdays in vba te gebruiken (met voorbeeld)

U kunt de NetworkDays- methode in VBA gebruiken om het aantal volledige werkdagen tussen specifieke begin- en einddatums te vinden.

Houd er rekening mee dat werkdagen weekenden en feestdagen uitsluiten.

Hier is een gebruikelijke manier om deze methode in de praktijk te gebruiken:

 Sub CalculateNetworkDays()

Dim i As Integer

For i = 2 To 9
    Range("C" & i) = WorksheetFunction.NetworkDays(Range("A" & i), Range("B" & i))
Next i

End Sub 

Dit specifieke voorbeeld berekent het aantal werkdagen tussen startdatums in het bereik A2:A9 en einddatums in het bereik B2:B9 en geeft de resultaten weer in het bereik C2:C9 .

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

Voorbeeld: hoe u NetworkDays in VBA gebruikt

Stel dat we de volgende lijst met begin- en einddatums in Excel hebben:

Stel dat we de NetworkDays -methode in VBA willen gebruiken om het aantal hele werkdagen tussen de begin- en einddatum van elke rij te berekenen.

We kunnen hiervoor de volgende macro maken:

 Sub CalculateNetworkDays()

Dim i As Integer

For i = 2 To 9
    Range("C" & i) = WorksheetFunction.NetworkDays(Range("A" & i), Range("B" & i))
Next i

End Sub

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

Kolom C toont het aantal volledige werkdagen tussen de begin- en einddatum in elke rij.

Bijvoorbeeld:

• Het aantal werkdagen tussen 1/2/2023 en 1/3/2023 bedraagt 2 . (aangezien deze twee data in het weekend vallen).
• Het aantal werkdagen tussen 1/5/2023 en 1/8/2023 bedraagt 2 .
• Het aantal werkdagen tussen 01/10/2023 en 01/20/2023 bedraagt 9 .

Enzovoort.

Opmerking : u kunt hier de volledige documentatie van de NetworkDays- methode in VBA vinden.

Aanvullende bronnen

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

VBA: Hoe de maandnaam van de datum te krijgen
VBA: IsDate gebruiken om te controleren of cel een datum is
VBA: mm/dd/jjjj gebruiken als datumformaat