Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1116to1120
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Erster Montag im Monat
markus
Hallo zusammen,
Archiv gibt leider nur Lösungen mit VBA her.
wie finde ich per VBA den ersten Montag im Monat?
Ich hatte eine Lösung ohne VBA, doch ist mein Prog weitläufiger und daher bin ich auf der Suche nach einer VBA lösung.
Danke vorab,
markus

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Erster Montag im Monat
18.11.2009 14:53:46
Oberschlumpf
Hi Markus
"Archiv gibt leider nur Lösungen mit VBA her.........und daher bin ich auf der Suche nach einer VBA lösung"
Und warum nutzt du dann nicht eine der VBA-Lösungen?
Ciao
Thorsten
Perfekt....
18.11.2009 16:10:28
Björn
Hallo,
Lach, das habe ich erst jetzt gesehen.
Klasse. Ich liebe solche Fragestellungen.
Danke Thorsten, für die treffende "Zusammenfassung" der Fragestellung.
Gruß
Björn B.
VBA Lösung
18.11.2009 17:08:13
Tino
Hallo,
müsste funktionieren
Dim Datum As Date
Datum = Date
Datum = DateSerial(Year(Datum), Month(Datum), 1)
Datum = Datum + 8 - Weekday(Datum, 2)
MsgBox Format(Datum, "dddd dd.mm.yyyy")
Gruß Tino
Anzeige
AW: @Tino
18.11.2009 17:47:57
Peter
Hallo Tino,
nur wenn der 1. Montag am Monatsersten ist (01.06.2009) gibt Dein Makro den 08.06.2009 aus.
Gruß Peter
AW: @Tino
18.11.2009 17:53:52
Peter
Halo Tino,
If Weekday(Datum, 2) 1 Then _
Datum = Datum + 8 - Weekday(Datum, 2)
könnte helfen.
Gruß Peter
ja genau, ich mach Montags immer blau. ;-) oT.
18.11.2009 18:22:17
Tino

315 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige