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:
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins