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

Forumthread: Monatslänge automatisch anpassen

Monatslänge automatisch anpassen
Nils
Hallo,
ich habe mir ein Kalenderblatt erstellt dass mir automatisch einen Monatskalender erstellt.
Der erste Tag (A3) wird dabei über zwei Drehfelder eingestellt, die Formel für den ersten Kalendertag sieht deshalb so aus: =DATUM($A$1;$C$1;1) Die weiteren Tage (A4 usw) werden dann mit =A3+1 usw automatisch eingetragen.
Jetzt habe ich allerdings das Problem, dass ich z.B. im April noch einen Tag vom Mai im Kalender habe, weil der Kalender immer über 31 Tage geht.
Auch für das Problem mit dem 29 Februar in Schaltjahren habe ich noch nicht lösen können.
Weiss jemand wie ich meinen Kalender dazu bringen kann in kurzen Monaten nach 30 bzw 28 bzw 29 Tagen aufzuhören und nur noch leere Felder einzutragen?
Auch Felder mit weisser Schrift helfen mir da nicht weiter, weil ich von anderen Tabellenblättern auf den Kalender verweise.
Gruß
Nils
Anzeige
AW: Monatslänge automatisch anpassen
20.07.2009 15:02:59
David
Hallo Nils,
schau dir mal dies hier an:
https://www.herber.de/bbs/user/63298.xls
Diesen Kalender habe ich mir mal für eigene Zwecke erstellt. Sicher kannst du dir daraus deine benötigten Teile rausziehen.
Gruß
David
AW: Monatslänge automatisch anpassen
20.07.2009 15:24:16
David
kleiner Fehler:
das Blatt rechnet nach einer Änderung über das Drehfeld die Arbeitsmappe nicht neu, vermutlich hatte ich mal die Berechnung auf manuell stehen. Um solch eine Einstellung zu umgehen muß der Code für den Button so lauten:
Private Sub SpinButton1_SpinDown()
Cells(2, 1) = Cells(2, 1) - 1
Calculate
End Sub

Private Sub SpinButton1_SpinUp()
Cells(2, 1) = Cells(2, 1) + 1
Calculate
End Sub
Gruß
David
Anzeige
AW: Monatslänge automatisch anpassen
20.07.2009 15:03:18
Bertram
Hallo Nils,
evtl. so: =WENN(MONAT(A3+1)=MONAT(A3);A3+1;"")
Gruß
Bertram
AW: Monatslänge automatisch anpassen
20.07.2009 15:05:48
robert
hi,
ab 29.tag diese formel runterkopieren-A31 musst du anpassen
an deinen kalender
gruß
robert
=WENN(MONAT(A31+1)>MONAT(A1);"";A31+1)
AW: Monatslänge automatisch anpassen
20.07.2009 15:21:18
Jochen
Hallo Nils,
Hier ein Beispiel
Nue in A1 Datum ändern
https://www.herber.de/bbs/user/63299.xls
Gruß
Jochen
Anzeige
AW: Monatslänge automatisch anpassen
20.07.2009 15:36:17
UweD
Hallo
....
A31 =WENN(A30"";WENN(MONAT(A30)=MONAT(A30+1);A30+1;"");"")
die Formel dann bis nach A33 kopieren.
Gruß UweD
noch ein Vorschlag
21.07.2009 07:18:18
Erich
Hi Nils,
mein Vorschlag (A4 runterkopieren bis A30):
 ABC
12010 6
2   
301.06.2010  
402.06.2010  
3028.06.2010  
3129.06.2010  
3230.06.2010  
33   

Formeln der Tabelle
ZelleFormel
A3=DATUM($A$1;$C$1;1)
A4=A3+1
A30=A29+1
A31=WENN(TAG(A$30+1)<29;"";A30+1)
A32=WENN(TAG(A$30+2)<29;"";A31+1)
A33=WENN(TAG(A$30+3)<29;"";A32+1)

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: noch ein Vorschlag
21.07.2009 13:19:13
Nils
Hallo,
ich habe die Formel von UweD genutzt und die funktioniert tadellos.
Danke an alle für die schnelle und kompetente Hilfe!
Gruß
Nils
AW: Monats-Ersten/-Letzen per Funktion
21.07.2009 15:23:57
Hermann
Hallo Nils,
hier eine Lösung, ganz ohne WENNs, nur mit der Datums-Funktion,
wenn in B4 das Datum des betreffenden Monats steht:
die Formel für den ersten Kalendertag eines Monats: =DATUM(JAHR(B4);MONAT(B4);1)
die Formel für den letzten Kalendertag eines Monats: =DATUM(JAHR(B4);MONAT(B4)+1;0)
Der Trick: bei der Berechnung des Monatsletzten, schaltet man den Monat um eins weiter und springt dann mit NULL (als Tag) auf den letzten Tag des gewünschten Monats zurück.
Gruß Hermann
Anzeige
..ist aber nicht das problem..
21.07.2009 18:40:06
robert
hi,
die formeln sind klar,
aber wie füllst du damit eine spalte
die zB. in A1 mit 1.2.2009 beginnt
bis zum monatsletzten ?
gruß
robert
;
Anzeige
Anzeige

Infobox / Tutorial

Monatslänge automatisch anpassen in Excel


Schritt-für-Schritt-Anleitung

Um die Monatslänge in Deinem Excel-Kalender automatisch anzupassen, kannst Du folgende Schritte ausführen:

  1. Erstelle die Basisformel: In Zelle A3 gib die folgende Formel ein, um den ersten Kalendertag zu setzen:

    =DATUM($A$1;$C$1;1)
  2. Automatische Tage hinzufügen: In Zelle A4 gib die Formel ein, um die Tage automatisch fortlaufend zu generieren:

    =A3+1
  3. Monatsende berücksichtigen: Um zu verhindern, dass der Kalender über die Monatslänge hinausgeht, nutze diese Formel ab Zelle A31:

    =WENN(MONAT(A30)=MONAT(A30+1);A30+1;"")

    Kopiere diese Formel bis zu A33, um sicherzustellen, dass nur die Tage des Monats angezeigt werden.

  4. Überprüfung der Schaltjahre: Für den Februar und Schaltjahre kannst Du die Formel in A31 wie folgt anpassen:

    =WENN(TAG(A$30+1)<29;"";A30+1)
  5. Tage automatisch eintragen: Ziehe die Formeln nach unten, um die restlichen Tage zu füllen.


Häufige Fehler und Lösungen

  • Problem: Die Berechnung aktualisiert sich nicht nach Änderungen.

    • Lösung: Stelle sicher, dass die Berechnung auf "Automatisch" eingestellt ist oder füge folgenden VBA-Code hinzu:
      
      Private Sub SpinButton1_SpinDown()
      Cells(2, 1) = Cells(2, 1) - 1
      Calculate
      End Sub

    Private Sub SpinButton1_SpinUp() Cells(2, 1) = Cells(2, 1) + 1 Calculate End Sub

  • Problem: Zu viele Tage im Kalender angezeigt.

    • Lösung: Überprüfe die Formeln in den Zellen, um sicherzustellen, dass sie korrekt sind.

Alternative Methoden

Eine weitere Möglichkeit, um die Monatslänge automatisch anzupassen, ist die Verwendung von Datumsfunktionen:

  • Erster Kalendertag:

    =DATUM(JAHR(B4);MONAT(B4);1)
  • Letzter Kalendertag:

    =DATUM(JAHR(B4);MONAT(B4)+1;0)

Diese Methoden sind besonders nützlich, wenn Du mit unterschiedlichen Monatslängen arbeiten möchtest, ohne komplexe Formeln schreiben zu müssen.


Praktische Beispiele

Hier sind einige praktische Beispiele, die Du nutzen kannst, um die Monatslänge automatisch anzupassen:

  1. Für den Monat April: Wenn Du in Zelle A1 das Jahr 2023 und in C1 die 4 (April) eingibst, wird der Kalender automatisch die Tage vom 1. bis 30. April anzeigen.

  2. Für den Februar in einem Schaltjahr: Wenn Du das Jahr 2020 in A1 und den Monat 2 in C1 eingibst, zeigt der Kalender korrekt 29 Tage an.


Tipps für Profis

  • Nutze Bedingte Formatierung, um Wochenenden oder Feiertage hervorzuheben.
  • Erstelle eine Dropdown-Liste für die Monate, um die Eingabe zu erleichtern.
  • Verwende Pivot-Tabellen, um die Daten schnell auszuwerten, wenn Du sie in einer größeren Tabelle speicherst.

FAQ: Häufige Fragen

1. Frage
Wie kann ich die Eingabe für den Monat einfacher gestalten?
Du kannst eine Dropdown-Liste erstellen, die die Monate enthält, und dann die Formel entsprechend anpassen.

2. Frage
Wie gehe ich mit Schaltjahren um?
Die oben genannten Formeln berücksichtigen automatisch Schaltjahre, wenn Du die Datumsfunktionen korrekt anwendest.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige