Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
216to220
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
216to220
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Monatsletzten herausfinden

Monatsletzten herausfinden
10.02.2003 12:52:19
Nadine
Hallo zusammen!

Wie kann ich per Makro den Monatsletzten von einem best. Monat herausfinden?

Gruß,

Nadine.


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

Betreff
Datum
Anwender
Anzeige
Re: Monatsletzten herausfinden
10.02.2003 12:58:18
Udo RiHü

Hallo,

Monatsletzter=dateserial(year(Datum),Month(datum)+1),1)-1

Gruss aus'm Pott
Udo

Re: Monatsletzten herausfinden
10.02.2003 12:59:05
Boris

Hi Nadine,

Sub test()
MsgBox DateSerial(2003, 3, 0)
End Sub

Ergibt den letzten Tag im Februar 2003.
Also immer Folgemonat,0

Gruß Boris

Re: Monatsletzten herausfinden
10.02.2003 12:59:31
Bernd Held

Hallo Nadine,

das klappt über folgende Funktion:

Function LetzterTag(inputdate As Date) As Date
LetzterTag = DateSerial(Year(inputdate), Month(inputdate) + 1, 0)
End Function

Sub LetzterTagImMonat()
s = LetzterTag(Worksheets("Tabelle1").Range("A1"))
MsgBox s
End Sub


Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA in 21 Tagen und VBA-Datenbank unter: http://held-office.de


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige