Hallo!
Ich möchte die Filterung einer Geburtstagsliste per VBA automatisieren.
Unter "Start!N1" in der Tabelle wird ein Startdatum für die übrigen Auswertungen in der Tabelle eingetragen.
Die Geburtstagsliste soll jedoch auch den vollen vergangenen Monat und die vollen kommenden 6 Monate anzeigen.
Aktuell löse ich dies so:
aDate = Application.Range("Start!N1")
vDate = DateAdd("m", -1, aDate)
bDate = DateAdd("m", 6, aDate)
Leider funktioniert meine Lösung noch nicht perfekt.
Die Liste "vergisst" teilweise einzelne Tage, da ich nicht den genauen Monatsanfang bzw. das konkrete Monatsende abfrage.
Hat jemand einen Vorschlag, wie ich die Daten genauer definieren kann?