Wie erhält man das Enddatum eines Monats in Excel?

Vielleicht ist es für Sie einfach, das Enddatum eines Monats zu erhalten, aber wenn es mehrere Datumsangaben in Excel gibt, wie können Sie dann schnell alle Enddaten jedes Monats auf einmal erhalten? Nun stelle ich Ihnen einige schnelle Tricks vor, um dieses Problem in Excel zu lösen.

Ende des Monatsdatum mit Formeln in Excel erhalten

Ende des Monatsdatum mit VBA in Excel erhalten

Ende des Monatsdatum mit Formeln in Excel erhalten

Die Verwendung einer Formel, um das Enddatum jedes Monats zu finden, ist für jeden Excel-Benutzer sehr einfach.

Wählen Sie eine Zelle neben den Datumsdaten aus und geben Sie dann diese Formel =DATE(YEAR(A2),MONTH(A2)+1,0) (A2 ist die Zelle, aus der Sie das Enddatum des Monats erhalten möchten) ein, drücken Sie die Eingabetaste auf der Tastatur, und ziehen Sie dann das Auto-Ausfüllen in den Bereich, auf den Sie diese Formel anwenden möchten. Nun wird das Enddatum jedes Monats in den Zellen angezeigt. Siehe Screenshots:

Außerdem können Sie diese Formel =EOMONTH(A2,0) verwenden, um das Enddatum des Monats zu erhalten. (Sie müssen die Ergebniszellen im Datumsformat formatieren, bevor Sie diese Formel eingeben.)

Tipp: In Excel 2003 oder niedrigeren Versionen, wenn Sie die Formel =EOMONTH(A2,0) verwenden möchten, müssen Sie zuerst Analysis Toolpak installieren, indem Sie auf Extras > Add-Ins klicken. Siehe Screenshots:

Ende des Monatsdatum mit definierter Funktion in Excel erhalten

Wenn Sie mit VBA vertraut sind, können Sie den folgenden VBA-Code verwenden, um das Enddatum des Monats zu finden.

1. Drücken Sie gleichzeitig die Tasten F11 + Alt auf der Tastatur, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.

2. Klicken Sie dann auf Einfügen > Modul, um ein neues Modulfenster einzufügen. Kopieren Sie dann den folgenden VBA-Code in das Fenster.

VBA: Ende des Monatsdatum erhalten.

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 und schließen Sie das Fenster. Wählen Sie dann eine Zelle aus und geben Sie diese Formel =LastDayInMonth(A2) ein (A2 enthält das Datum, von dem Sie das Enddatum des Monats erhalten möchten), drücken Sie dann die Eingabetaste und Sie erhalten das Enddatum des Monats.

Hinweis: Dieses VBA erfordert auch, dass Sie die Ergebniszellen im Datumsformat formatieren, bevor Sie diese Formel =LastDayInMonth(A2) eingeben.

Verwandte Artikel:

• Finde den ersten/letzten Werktag eines Monats in Excel