Schaltjahr

[Gremona]

Hallo lieber Forum
 
Habe ein Problem! ich habe mir einen Kalender mit Excel gebastelt, (bin kein Profi) bin nun an einem Punkt angekommen wo ich nicht mehr weiterkomme. Es geht um das Schaltjahr, der Kalender ist Automatisiert was bedeutet, dass wenn ich über ein ActiveX Steuerelement die Jahreszahl verändere passt sich der ganze Kalender der Jahreszahl an. 
 
Das einzige was ich noch nicht zum Laufen gebracht habe ist, dass das Schaltjahr sich Automatisch anpasst, was ich genau möchte ist das wenn der Februar 29 Tage hat der auch angezeigt wird, wenn er nur 28 Tage hat das die Zelle wo der 29 wäre leer ist.
 
Im Anhang ist der Kalender als xlsm Datei also mit Makro für das ActiveX Steuerelement.
 
 
Für eure Hilfe wäre ich euch sehr dankbar.:19:
   

  Kalender.xlsm (Größe: 28,68 KB / Downloads: 14)

[Crazy Tom]

Hallo

wo genau ist jetzt dein Problem?
im Schaltjahr steht doch die 29 drin und in den anderen nicht!

MfG Tom

[Gremona]

Hallo Crazy Tom 

Ja die 29 steht schon da, hast du auch mal das Jahr gewechselt und genau geschaut was passiert?
Auch steht bei 2016 SO. 28 /SO. 29 was ja nicht korrekt ist.
Bei einem Schaltjahr wie 2016 müsste MO. 29 Stehen und sonst sollte der Februar bis zum nächsten Schaltjahr nur bis zum 28 anzeigen.

Lg. Gremona

[IchBinIch]

Hi,

die Formel in C33

Code:

=WENN(MONAT(C32+1)<>MONAT(C32);"";C32+1)

Gruß
Ich

[WillWissen]

Hi,

ich würde den Kalender so aufbauen:

in A5 die Formel eintragen, nach rechts ziehen bis Spalte 12 und nach unten bis Zeile 35. Dann mit STRG+'+' jeweils eine Spalte dazwischen setzten und das Ganze nach Lust und Laune färben. Wenn du die Jahreszahl mit dem Spin-Button ändern willst, brauchst du noch nicht einmal ein Makro. Es reicht in den Eigenschaften eine LinkedCell anzugeben und in der das Startjahr eingeben. Der Rest ist Formatierungssache.

Tabelle2

	A	B	C	D	E	F	G	H	I
1	2016
2
3
4	Januar		Februar		März		April		Mai
5	Fr.01		Mo.01		Di.01		Fr.01		So.01
6	Sa.02		Di.02		Mi.02		Sa.02		Mo.02
7	So.03		Mi.03		Do.03		So.03		Di.03
8	Mo.04		Do.04		Fr.04		Mo.04		Mi.04
9	Di.05		Fr.05		Sa.05		Di.05		Do.05

Formeln der Tabelle

Zelle Formel A4 =A5 A5 =WENNFEHLER(--(ZEILE()-4&"."&SPALTE(A1)&"."&$A$1);"")

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

[Gremona]

Hallo Ich und Willwissen

Die Formel von dir Ich ist genau das was ich gesucht habe Danke viel mal. :18:
Willwissen, dein Vorschlag werde ich mal bei Gelegenheit genauer anschauen auch dir Danke. :19:

[Rabe]

Hi Günter,

Dann mit STRG+'+' jeweils eine Spalte dazwischen setzten und das Ganze nach Lust und Laune färben.

bist Du sicher?

Tabelle1

	A	B	C	D	E
1	2017
2
3
4	Januar		März		Mai
5	01.01.2017		01.03.2017		01.05.2017
6	02.01.2017		02.03.2017		02.05.2017
7	03.01.2017		03.03.2017		03.05.2017

verwendete Formeln
Zelle	Formel	Bereich	N/A
A4,C4,E4	=A5
A5:A7,C5:C7,E5:E7	=WENNFEHLER(--(ZEILE()-4&"."&SPALTE(A1)&"."&$A$1);"")

Excel-Inn.de

Hajo-Excel.de

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 19.08 einschl. 64 Bit