So verwenden sie die workday-funktion in vba (mit beispiel)

Mit der WorkDay- Methode in VBA können Sie eine bestimmte Anzahl von Arbeitstagen zu einem Datum addieren oder subtrahieren.

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

 SubAddWorkDays ()

Dim i As Integer

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

End Sub

Dieses spezielle Makro addiert die im Bereich B2:B10 angegebene Anzahl von Werktagen zu jedem Datum im Bereich A2:A10 und zeigt die Ergebnisse im Bereich C2:C10 an.

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

Beispiel: So verwenden Sie die WorkDay-Funktion in VBA

Nehmen wir an, wir haben in Excel eine Spalte mit Datumsangaben sowie eine weitere Spalte, die die Anzahl der Werktage angibt, die zu jedem Datum hinzugefügt werden sollen:

Wir können das folgende Makro erstellen, um die Anzahl der Werktage in Spalte B zu jedem entsprechenden Datum in Spalte A hinzuzufügen:

 SubAddWorkDays ()

Dim i As Integer

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

End Sub

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

Standardmäßig werden in Spalte C Datumsangaben als fortlaufende Nummern angezeigt.

Um diese Werte als erkennbare Datumsangaben anzuzeigen, markieren Sie den Bereich C2:C10 , klicken Sie dann im oberen Menüband auf die Registerkarte Einfügen , dann auf das Dropdown-Menü Zahlenformat und dann auf Kurzes Datum :

Jede Seriennummer wird nun als Datum angezeigt:

In Spalte C wird jedes Datum in Spalte A angezeigt, wobei die spezifische Anzahl von Werktagen in Spalte B hinzugefügt wird.

Beachten Sie, dass die WorkDay- Methode diese Anzahl an Arbeitstagen vom Datum in Spalte A subtrahiert, wenn wir in Spalte B eine negative Zahl angeben.

Hinweis : Die vollständige Dokumentation zur VBA- WorkDay- Methode 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 sortieren Sie nach Datum
VBA: So fügen Sie ein Datum zwischen zwei Daten hinzu