Kalender aus Zelle aufrufen?

[paljass]

Hi,
ersetze einfach Heute() durch dein Anfangsdatum mit der Funktion Datum(2016;1;1), wobei die Zahlen natürlich deinem Datum entsprechen sollten

paljass

[T.Ruediger]

Hi,
...dein Anfangsdatum mit der Funktion Datum(2016;1;1)...
paljass

Hallo,

klappt super - Danke!

Mit freundlichen Grüßen
T. Rüdiger

[T.Ruediger]

Hallo,

Das mit dem Datum funktioniert wie geschrieben tadellos. Das Datum soll jedoch dynamisch zur jeweiligen Kalenderwoche des Jahres passen.
Dazu ermittele ich das Datum des Samstags mit folgender Formel

Code: Alles auswählen

=DATUM($B$1;1;1)+($B3-WENN(WOCHENTAG(DATUM($B$1;1;1);2)>4;0;1))*7+7-1-WOCHENTAG(DATUM($B$1;1;1)+($B3-WENN(WOCHENTAG(DATUM($B$1;1;1);2)>4;0;1))*7;2)

Das ganze erfolgt in drei Zellen, welche dann jeweils mit Jahr, Monat bzw. Tag formatiert sind.
Die dort ermittelten Werte wollte ich dann in die Funktion Datum übernehmen ..

Code: Alles auswählen

TEXT(DATUM(O3;P3;Q3)+ZEILE(A1:A31)-1;"tt.mm.jjjj")

... endet jedoch mit Fehler "Err.502"
Wo ist mein Denkfehler, oder geht das so gar nicht?

Mit freundlichen Grüßen
T. Rüdiger

[Thomas Mc Kie]

Häng doch bitte eine Beispieldatei an, dann muss ich (oder andere) die Formel-Konstruktion nicht nach deiner (guten, weil detaillierten Erklärung) nachbasteln. Spart Zeit, die ich zur Problemlösung nutzen kann.
Grüße
Thomas

[paljass]

Wenn in den Zellen O3, P3 und Q3 die gleiche Formel steht und die Datunswerte nur jeweils anders formatiert sind, dann geht doch bei Gültigkeit die Formel

Code: Alles auswählen

TEXT(DATUM(JAHR(O3);MONAT(O3);TAG(O3))+ZEILE(A1:A31)-1;"tt.mm.jjjj")

paljass

[T.Ruediger]

Hallo,

Häng doch bitte eine Beispieldatei an...
Grüße Thomas

Stimmt, werde ich beim nächsten mal so machen.

Code: Alles auswählen

TEXT(DATUM(JAHR(O3);MONAT(O3);TAG(O3))+ZEILE(A1:A31)-1;"tt.mm.jjjj")

paljass

Kaum macht man es richtig, schon funktionierts.
Herzlichen Dank - funktioniert super!

Noch ein paar Kleinigkeiten in der Formatierung und meine Tabelle ist fertig.

Mit freundlichen Grüßen
T. Rüdiger