Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Monatswechsel erkennen und Zelle ausfüll

Forumthread: Monatswechsel erkennen und Zelle ausfüll

Monatswechsel erkennen und Zelle ausfüll
17.11.2020 09:49:29
Hello
Hallo Zusammen,
ich habe folgendes Problem:
Ich habe in der Spalte A jeden Tag der letzten 20 Jahre stehen.
Nun benötige ich ein X in jede entsprechende Zeile in der Spalte 3, sobald der Monat sich ändert und einen entsprechenden Button, der dies auslöst.
Kann mir da jemand mit dem Sub-Code helfen?
Vielen Dank
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: eine kleine Formel tut es doch aus ...
17.11.2020 09:59:26
neopa
Hallo,
... wenn Du in Spalte A echte Datumswerte zu stehen hast, dann ab C2: =WENN(MONAT(A2)=MONAT(A1);"";"X") und diese nach unten kopieren.
Gruß Werner
.. , - ...
Leerzellen sind Januar
17.11.2020 12:43:38
WF
.
AW: und Du hast die Leerzellen gesehen? owT
17.11.2020 15:44:44
neopa
Gruß Werner
.. , - ...
Anzeige
7.300 ununterbrochene Datumswerte ?
17.11.2020 16:07:42
WF
Wer's glaubt .....
Anzeige

Infobox / Tutorial

Monatswechsel in Excel erkennen und Zelle automatisch ausfüllen


Schritt-für-Schritt-Anleitung

Um in Excel einen Monatswechsel zu erkennen und automatisch ein "X" in die entsprechende Zelle einzufügen, folge diesen Schritten:

  1. Daten eingeben: Stelle sicher, dass du in Spalte A echte Datumswerte hast. Diese sollten fortlaufend für den gewünschten Zeitraum (z. B. die letzten 20 Jahre) sein.
  2. Formel einfügen: Gehe zu Zelle C2 und füge folgende Formel ein:
    =WENN(MONAT(A2)=MONAT(A1);"";"X")
  3. Formel nach unten kopieren: Ziehe die untere rechte Ecke der Zelle C2 nach unten, um die Formel auf die restlichen Zellen in Spalte C zu kopieren.
  4. Button hinzufügen (optional): Um einen Button hinzuzufügen, gehe zu "Entwicklertools" > "Einfügen" > "Button (Formsteuerung)". Platziere den Button im Arbeitsblatt und verknüpfe ihn mit einem Makro, um die Formel erneut auszuführen.

Häufige Fehler und Lösungen

  • Fehler: Das "X" erscheint nicht
    Lösung: Überprüfe, ob die Daten in Spalte A echte Datumswerte sind. Manchmal können sie als Text formatiert sein, was die Funktion beeinträchtigt.

  • Fehler: Falsche Zellen werden ausgefüllt
    Lösung: Stelle sicher, dass die Formel korrekt auf die vorherige Zeile verweist (A1 in der Formel). Eine falsche Referenz kann das Ergebnis verfälschen.


Alternative Methoden

Anstatt eine Formel zu verwenden, kannst du auch ein VBA-Makro nutzen, um das "X" einzufügen. Hier ist ein einfaches Beispiel:

Sub MonatswechselErkennen()
    Dim i As Long
    Dim letzteZeile As Long

    letzteZeile = Cells(Rows.Count, 1).End(xlUp).Row

    For i = 2 To letzteZeile
        If Month(Cells(i, 1).Value) <> Month(Cells(i - 1, 1).Value) Then
            Cells(i, 3).Value = "X"
        End If
    Next i
End Sub

Dieses Makro überprüft jede Zeile in Spalte A und fügt ein "X" in Spalte C ein, wenn ein Monatswechsel erkannt wird.


Praktische Beispiele

  1. Monatswechsel in einer Liste: Wenn du eine Excel-Datei mit täglichen Daten hast, wird die oben genannte Formel oder das Makro verwendet, um jeden Monatswechsel zu markieren.
  2. Jahresübergang: Die Formel erkennt auch den Wechsel von Dezember zu Januar, sodass ein "X" an der richtigen Stelle erscheint.

Tipps für Profis

  • Datenformatierung: Stelle sicher, dass die Datumswerte in Spalte A im richtigen Format vorliegen. Du kannst dies über "Format Cells" und dann "Date" überprüfen.
  • Automatisierung: Überlege, ob du das VBA-Makro automatisch ausführen möchtest, wenn das Arbeitsblatt geändert wird. Dies kannst du durch Einfügen des Codes in das Arbeitsblattmodul erreichen.
  • Fehlerbehandlung: Füge in deinem Makro Fehlerbehandlungsroutinen hinzu, um sicherzustellen, dass das Programm auch bei unerwarteten Eingaben stabil bleibt.

FAQ: Häufige Fragen

1. Wie kann ich das Makro ausführen?
Um das Makro auszuführen, drücke ALT + F8, wähle das gewünschte Makro aus und klicke auf "Ausführen".

2. Funktioniert das auch in Excel Online?
Leider funktioniert VBA nicht in Excel Online. Du kannst jedoch die Formel-Methode verwenden, die auch in der Online-Version funktioniert.

3. Was mache ich, wenn meine Daten in einer anderen Spalte sind?
Du kannst die Zellreferenzen in der Formel oder im Makro anpassen, um die richtigen Spalten zu verwenden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige