Wie ermittelt man das Datum des Monatsendes in Excel?
Möglicherweise fällt es Ihnen leicht, das Monatsende eines einzelnen Datums zu ermitteln – doch wie erhalten Sie schnell und einfach alle Monatsenddaten auf einmal, wenn mehrere Datumsangaben in Excel vorliegen? Im Folgenden zeige ich Ihnen einige praktische Methoden, um dieses Problem in Excel effizient zu lösen.
Monatsende-Datum mithilfe von Formeln in Excel ermitteln
Monatsende-Datum mithilfe von VBA in Excel ermitteln
Monatsende-Datum mithilfe von Formeln in Excel ermitteln
Mit einer Formel das Enddatum jedes Monats zu ermitteln, ist für jeden Excel-Anwender kinderleicht.
Wählen Sie eine Zelle neben Ihren Datumsangaben aus und geben Sie folgende Formel ein:=DATUM(JAHR(A2);MONAT(A2)+1;0) (A2 ist die Zelle, aus der Sie das jeweilige Monatsendedatum ermitteln möchten). Drücken Sie anschließend die Enter-Taste und ziehen Sie den Ausfüllgriff auf den gewünschten Bereich. Sofort erscheint in jeder Zelle das letzte Datum des entsprechenden Monats. Siehe Screenshots:
 |
 |
 |
Alternativ können Sie auch diese Formel =MONATSENDE(A2;0) verwenden, um das Monatsenddatum zu erhalten. (Formatieren Sie die Ergebniszellen vor Eingabe der Formel bitte als Datumsformat.)
Hinweis: Wenn Sie in Excel 2003 oder älteren Versionen die Formel =MONATSENDE(A2;0) verwenden möchten, müssen Sie zunächst das Analyse-Funktionen-Paket installieren, indem Sie auf Extras > Add-Ins klicken. Siehe Screenshots:
 |  |  |
Monatsende-Datum mithilfe einer benutzerdefinierten Funktion in Excel ermitteln
Wenn Sie mit VBA vertraut sind, können Sie den folgenden VBA-Code nutzen, um das Enddatum des Monats zu ermitteln.
1. Drücken Sie gleichzeitig die Tasten Alt + F11 auf der Tastatur, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie anschließend auf Einfügen > Modul, um ein neues Modulfenster einzufügen. Kopieren Sie dann den folgenden VBA-Code in dieses Fenster.
VBA: Monatsenddatum ermitteln.
Function LastDayInMonth(Optional pDate As Date = 0) As Date
'Updateby20140723
If pDate = 0 Then pDate = VBA.Date
LastDayInMonth = VBA.DateSerial(VBA.Year(pDate), VBA.Month(pDate) + 1, 0)
End Function
3. Speichern Sie und schließen Sie dieses Fenster. Wählen Sie anschließend eine Zelle aus und geben Sie die folgende Formel ein: =LastDayInMonth(A2) (A2 enthält das Datum, für das Sie das Monatsende ermitteln möchten). Drücken Sie dann die Enter-Taste – und schon erhalten Sie das letzte Datum des Monats.
Hinweis: Damit dieses VBA korrekt funktioniert, formatieren Sie die Ergebniszellen bitte ebenfalls im Datumsformat, bevor Sie die Formel =LastDayInMonth(A2) eingeben.
Verwandte Artikel:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins