In diesem Forum haben Sie die Möglichkeit Kommentare, Fragen und Verbesserungsvorschläge zu den im vb@rchiv gelisteten Tipps und Workshops zu posten. Hinweis: Ein neues Thema kann immer nur über die jeweilige Tipps & Tricks bzw. Workshop Seite eröffnet werden!

Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Bewegliche Feiertage und Arbeitstage eines Monats
Autor: driver57
Datum: 21.03.12 14:12
Hallo, genau das habe ich gesucht. Beim ausprobieren habe ich allerdings einen ganz kleinen Fehler entdeckt. Und zwar in dem folgenden Code-Abschnitt: If Monat = 2 Then ' Speziallfall: Februar (auf Schaltjahr prüfen) Tage = Day(DateAdd("d", -1, X)) End If Bei der Ermittlung von "Tage" bezieht sich DateAdd auf den Monat vor dem Februar, was natürlich zu einem falschen Ergebnis (31) führt. nach der Änderung auf... Tage = Day(DateAdd("d", -1, "1.3." & Right(X, 4))) funktioniert alles hervorragend Vielen Dank nochmal für den Code!!!

Tipp 1185: Bewegliche Feiertage und Arbeitstage eines Monats	5.328	manu86	29.04.09 10:00
Re: Bewegliche Feiertage und Arbeitstage eines Monats	2.448	Dieter	29.04.09 15:21
Re: Bewegliche Feiertage und Arbeitstage eines Monats	2.339	hr40	29.04.09 23:14
Re: Bewegliche Feiertage und Arbeitstage eines Monats	1.928	driver57	21.03.12 14:12

Sie sind nicht angemeldet! Um einen neuen Beitrag schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen