Clever-Excel-Forum

Normale Version: Datum auf nächsten Montag setzen, falls Samstag oder Sonntag
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen ich schon wieder

Ich nehme an, dass ihr mir das schnelle beantworten könnt

Code:
If Weekday(dDatum) = 1 Or Weekday(dDatum) = 7 Then

Wie bringe ich es hin, dass mir der nächsten Montag angegeben wird, falls "dDatum" ein Samstag oder Sonntag ist?

Beispiel:

02.11.19 - Samstag (dDatum)  --->  04.11.19 - Montag (dDatum)

Gruss Primo
Hallo,
es existieren verschiedene Möglichkeiten u.a. :

Select Case Weekday(dDatum)
    Case 1
       dDatum = dDatum + 1
    Case 7
       dDatum = dDatum + 2
End Select
Hallo Armin

Herzlichen Dank für deine schnelle Hilfe.

Der Code hat wunderbar funktioniert   :)

Freundliche Grüsse

Primi