Kalenderwochen ISO

Excelformel: =KÜRZEN((A1-WOCHENTAG(A1;2)-DATUM(JAHR(A1+4-WOCHENTAG(A1;2)) ;1;-10))/7)

Habe es geschafft, die Excelformel dafür zu entschlüsseln und für Papyrus umzuschreiben ;o). Da Papyrus andere Tagesziffern hat, als die Excelformel (Excel hat da 3 Typen; die Formel hat WOCHENTAG Typ 2), musste mit DAYOFWEEK getrickst werden, dass Mo=1 und Sonntag = 7 ist. Wer die Formel noch optimieren kann …

TRUNC

((TOTALDAYS(A1) -

(IF DAYOFWEEK(CTOD(A1) - 1) == ‚0‘ THEN ‚7‘ ELSE DAYOFWEEK(CTOD(A1) - 1)) -

TOTALDAYS(CTOD(STR(YEAR(CTOD(A1) + 4 - VAL((IF DAYOFWEEK(CTOD(A1) - 1) == ‚0‘ THEN ‚7‘ ELSE DAYOFWEEK(CTOD(A1) - 1))))) + (STR(‚0101‘))) - 11))/7)

A1 ist hier das Feld fürs Datum.