In Spalte "K" sollte folgende Formel eingetragen werden:
=WENN($B1706"";"";KÜRZEN(($A1706-DATUM(JAHR($A1706+3-REST($A1706-2;7));1;REST($A1706-2;7)-9))/7))
Es wird aber diese Formel eingetragen:
=WENN(RC2"";"";KÜRZEN((RC1-DATUM(JAHR(RC1+3-REST(RC1-2;7));1;REST(RC1-2;7)-9))/7))
Die Formel wird automatisch bei doppelklick eingetragen:
Cells(Target.Row - 1, 11).Formula = "=IF(RC2"""","""",TRUNC((RC1-DATE(YEAR(RC1+3-MOD(RC1-2,7)),1,MOD(RC1-2,7)-9))/7))" 'Kalenderwoche anzeigen in K
Wo liegt bitte der Fehler ?Gruß Heinz7