Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Kalenderwoche und Datum

Kalenderwoche und Datum
03.07.2004 21:56:08
Roland
Hallo zusammen,
ich möchte in einer Textbox die Kalenderwoche (z.B. 37) eingeben und dann den zugehörigen Montag (als 1. Tag der Woche) und den nächsten Sonntag in einer Labelbox angezeigt bekommen!
Wer kann mir bei der Formel oder VBA-Code helfen?
Besten Dank
Roland
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kalenderwoche und Datum
03.07.2004 23:01:36
Roland
Hallo Klaus-Dieter,
ich habe die richtige Info nach deinem Rat gefunden!
Besten Dank für die schnelle Hilfe!
Roland
AW: Montag der Kalenderwoche x
FP
Hallo Roland,
diese Funktion gibt Dir das Datum des Montags der gesuchten KW zurück:

Function KW2Montag(Optional KW As Byte, Optional Jahr As Integer) As Date
KW = IIf(KW * -(KW < 54) > 0, KW, 1)
Jahr = IIf(Jahr < 1901, Year(Date), Jahr)
KW2Montag = DateSerial(Jahr, 1, KW * 7) - 3 - DateSerial(Jahr, 1, 2) Mod 7
End Function

Wird weder die KW noch das Jahr übergeben, ermittelt die Funktion den Montag der KW 1 des aktuellen Jahres.
Den Sonntag erhältst Du dann, indem Du 6 Tage zum derart ermittelten Datum addierst.
Servus aus dem Salzkammergut
Franz
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige