Wie legt man in Excel ein Datum auf den ersten Tag des Monats fest?
Beim Arbeiten mit Datensätzen in Excel müssen Sie häufig Datumsangaben normalisieren – etwa ein beliebiges Datum auf den ersten Tag seines Monats anpassen. Das ist besonders nützlich für Finanzanalysen, monatliche Berichte oder das Gruppieren von Daten nach Monaten, unabhängig vom jeweiligen Tag, wie im folgenden Beispiel gezeigt. In diesem Leitfaden stellen wir Ihnen zwei praktische Excel-Formeln und einen VBA-Code vor, mit denen Sie jedes Datum mühelos auf den ersten Tag des entsprechenden Monats umwandeln können.
Datum auf den ersten Tag des angegebenen Monats mit Formeln festlegen oder umwandeln
Datum auf den ersten Tag des angegebenen Monats mit VBA festlegen oder umwandeln
Datum auf den ersten Tag des angegebenen Monats mit Formeln festlegen oder umwandeln
Um eine Liste zufälliger Datumsangaben schnell auf den ersten Tag ihres jeweiligen Monats anzupassen, bietet Excel einige einfache Formeln – ideal, wenn Sie Datumsangaben für PivotTables, monatliche Aggregationen oder periodische Datenüberprüfungen standardisieren möchten.
1. Klicken Sie auf eine leere Zelle neben Ihrem Datum (verwenden Sie beispielsweise die Zelle)B2, wenn sich Ihr ursprüngliches Datum in A2 befindet). Geben Sie die folgende Formel ein:
=EOMONTH(A2,-1)+12. Drücken Sie nach Eingabe der Formel Enter. Die Zelle zeigt nun den ersten Tag des Monats für das Datum in A2 an.
3. Um diese Formel auf die restlichen Datumsangaben anzuwenden, bewegen Sie den Mauszeiger in die untere rechte Ecke der Zelle, bis der Ausfüllknauf ()+-Symbol) erscheint. Klicken und ziehen Sie den Ausfüllknauf über den gewünschten Zellbereich – jedes Datum wird automatisch auf den ersten Tag seines Monats angepasst. Siehe Screenshot:
Fehlerbehebung und Tipps:
- Wenn das Formelergebnis als fortlaufende Zahl angezeigt wird, formatieren Sie die Zelle am besten als Datum. Klicken Sie dazu mit der rechten Maustaste auf die Zelle, wählen Sie Zellenformat festlegen und anschließend ein passendes Datumsformat.
- Stellen Sie sicher, dass die Datumsangaben in Spalte A gültige Excel-Datumsformate aufweisen – andernfalls liefern die Formeln möglicherweise Fehler.
Hinweise:
1. Es gibt eine alternative Formel, die Sie verwenden können, falls Sie eine einfachere Struktur bevorzugen oder EOMONTH in Ihrer Excel-Version nicht verfügbar ist. Geben Sie in einer leeren Zelle Folgendes ein:
=DATE(YEAR(A2),MONTH(A2),1)Diese Formel extrahiert direkt Jahr und Monat aus Ihrem Datum und setzt den Tag auf den 1., sodass Sie stets den ersten Tag des Monats erhalten. Wie zuvor können Sie die Formel einfach nach unten ziehen, um weitere Zellen in der Spalte automatisch auszufüllen.
2. In beiden Formeln sollte A2 durch die Zellreferenz des Datums ersetzt werden, das Sie umwandeln möchten. Passen Sie die Zellreferenz entsprechend an, falls sich Ihre Daten in einer anderen Spalte befinden.
Benutzerfreundlichkeit und Einschränkungen:
- Diese Methoden eignen sich ideal für Standard-Excel-Arbeitsblätter. Wenn Sie jedoch mit großen Datensätzen arbeiten oder diesen Vorgang effizient für mehrere Dateien automatisieren möchten, empfiehlt sich der Einsatz von VBA oder speziellen Batch-Tools.
- Formeln liefern die besten Ergebnisse bei klar definierten Datums-Spalten – gemischte Datentypen oder Textzeichenfolgen, die wie Datumsangaben aussehen, sollten vorher bereinigt werden.
Datum auf den ersten Tag des angegebenen Monats mit VBA festlegen oder umwandeln
Für Anwender, die diesen Vorgang häufig in verschiedenen Arbeitsmappen oder bei sehr großen Datenmengen durchführen müssen, spart ein VBA-Makro wertvolle Zeit. Diese Methode eignet sich zudem ideal, wenn Sie mehrere Spalten gleichzeitig umwandeln oder den gesamten Prozess automatisieren möchten. So geht’s:
1. Gehen Sie zu Entwicklertools > Visual Basic, um den VBA-Editor zu öffnen. Klicken Sie im Editor-Fenster auf Einfügen > Modul, und fügen Sie anschließend den folgenden Code ein:
Sub DatesToFirstOfMonth()
Dim rng As Range
Dim cell As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the range for conversion", xTitleId, rng.Address, Type:=8)
For Each cell In rng
If IsDate(cell.Value) Then
cell.Value = DateSerial(Year(cell.Value), Month(cell.Value), 1)
End If
Next cell
End Sub2. Klicken Sie nach Eingabe des Codes auf die Schaltfläche 
(Ausführen) oder drücken Sie F5, um das Makro auszuführen. Sie werden aufgefordert, einen Bereich auszuwählen – markieren Sie den Bereich mit Ihren Datumsangaben, und alle ausgewählten Datumsangaben werden automatisch auf den ersten Tag ihres jeweiligen Monats gesetzt.
- Wenn Sie einen „Typinkompatibilitäts“-Fehler erhalten, prüfen Sie, ob die ausgewählten Zellen gültige Datumsangaben enthalten.
- Denken Sie daran, Ihre Arbeit zu speichern, bevor Sie VBA-Code ausführen – denn Makros lassen sich nicht mit Strg+Z rückgängig machen.
Mit diesen Optionen können Sie jede Liste von Datumsangaben effizient auf den ersten Tag des jeweiligen Monats umwandeln – egal, ob Sie Formeln bevorzugen oder die Aufgabe per VBA automatisieren möchten. Wählen Sie die Methode, die am besten zu Ihrem Arbeitsablauf und Ihrer Datenmenge passt. Sollten Fehler oder unerwartete Ergebnisse auftreten, überprüfen Sie sorgfältig das Zellenformat und die Zellbezüge, und ziehen Sie vorab die Verwendung des Excel-Tools Text in Spalten zur Bereinigung mehrdeutiger Datumsangaben in Betracht.
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