ChatGPT-Thema: Erster Tag einer Kalenderwoche

Schlüsselwortsuche im Archiv: Kalenderwoche

Excel / VBA deutsch: Wie kann ich den ersten Tag einer vorgegebenen Kalenderwoche ermitteln?
Um den ersten Tag einer Kalenderwoche in Microsoft Excel zu ermitteln, kannst du die Funktion "WOCHENTAG" verwenden. Diese Funktion gibt die Wochentagsnummer eines Datums zurück, wobei Montag als 1, Dienstag als 2 usw. gilt.

Um den ersten Tag einer Kalenderwoche zu ermitteln, könntest du zunächst das Datum der Kalenderwoche als Wochentagsnummer ermitteln und dann das Datum des vorhergehenden Sonntags berechnen.

Hier ist ein Beispiel für den VBA-Code, der den ersten Tag einer Kalenderwoche mit einer gegebenen Jahreszahl und Kalenderwochennummer berechnet:


Function ErsterTagDerKalenderwoche(Jahr As Integer, Kalenderwoche As Integer) As Date
ErsterTagDerKalenderwoche = DateSerial(Jahr, 1, (Kalenderwoche - 1) * 7 + 1)
ErsterTagDerKalenderwoche = DateAdd("d", -Weekday(ErsterTagDerKalenderwoche) + 1, ErsterTagDerKalenderwoche)
End Function


Du kannst diese Funktion wie folgt aufrufen, um den ersten Tag der Kalenderwoche Nummer 3 im Jahr 2021 zu ermitteln:


Dim Ergebnis As Date
Ergebnis = ErsterTagDerKalenderwoche(2021, 3)


Das Ergebnis wäre dann der 18. Januar 2021.

Hinweis: Die obige Funktion geht davon aus, dass die Kalenderwoche mit einem Montag beginnt. Wenn die Kalenderwoche in deinem Land mit einem anderen Wochentag beginnt, musst du entsprechend anpassen.