So verwenden sie networkdays in vba (mit beispiel)


Sie können die NetworkDays- Methode in VBA verwenden, um die Anzahl ganzer Werktage zwischen bestimmten Start- und Enddaten zu ermitteln.

Beachten Sie, dass Wochenenden und Feiertage von Werktagen ausgenommen sind.

Hier ist eine gängige Methode, diese Methode in der Praxis anzuwenden:

 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 

In diesem speziellen Beispiel wird die Anzahl der Werktage zwischen Startdaten im Bereich A2:A9 und Enddaten im Bereich B2:B9 berechnet und die Ergebnisse im Bereich C2:C9 angezeigt.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: So verwenden Sie NetworkDays in VBA

Angenommen, wir haben die folgende Liste mit Start- und Enddaten in Excel:

Nehmen wir an, wir möchten die NetworkDays- Methode in VBA verwenden, um die Anzahl ganzer Werktage zwischen dem Start- und Enddatum jeder Zeile zu berechnen.

Dazu können wir das folgende Makro erstellen:

 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

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Spalte C zeigt die Anzahl der vollen Werktage zwischen dem Start- und Enddatum in jeder Zeile.

Zum Beispiel:

  • Die Anzahl der Arbeitstage zwischen dem 01.02.2023 und dem 01.03.2023 beträgt 2 . (da diese beiden Termine am Wochenende liegen).
  • Die Anzahl der Arbeitstage zwischen dem 01.05.2023 und dem 01.08.2023 beträgt 2 .
  • Die Anzahl der Arbeitstage zwischen dem 10.01.2023 und dem 20.01.2023 beträgt 9 .

Und so weiter.

Hinweis : Die vollständige Dokumentation der NetworkDays- Methode in VBA finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So erhalten Sie den Monatsnamen vom Datum
VBA: So verwenden Sie IsDate, um zu überprüfen, ob es sich bei der Zelle um ein Datum handelt
VBA: So verwenden Sie MM/TT/JJJJ als Datumsformat

Einen Kommentar hinzufügen

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert