Formel verbessern

Forumthread: Formel verbessern

Formel verbessern

27.12.2004 13:14:42

Achim

Hilfe die Formel macht nicht was sie soll!!!!
=WENN(WOCHENTAG(C2;2)=1;KALENDERWOCHE(C2;2);" ")
Die Formel kennt keine erste Woche im Jahr.Warum keine Ahnung!!
MfG
Achim H.

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Formel verbessern

=Peter=
AW: Formel verbessern

27.12.2004 13:29:48

Achim

AW: Formel verbessern

=Peter=

Hallo Achim,
die Funktion Kalenderwoche rechnet nicht nach DIN. Wenn du die Kalenderwoche korrekt berechnen willst nutze entweder diese Formel:
=KÜRZEN((A1-WOCHENTAG(A1;2)-DATUM(JAHR(A1+4-WOCHENTAG(A1;2));1;-10))/7)
oder verwende diese benutzerdefinierte Funktion:


Function DIN_KW(Datum As Date) As Integer
'   von Christoph Kremer, Aachen
Dim t&
t = DateSerial(Year(Datum + (8 - Weekday(Datum)) Mod 7 - 3), 1, 1)
DIN_KW = (Datum - t - 3 + (Weekday(t) + 1) Mod 7) \ 7 + 1
End Function

Gruss
Peter

AW: Formel verbessern

27.12.2004 13:29:48

Achim

Hallo Peter
Danke für die Hilfe.
Nun geht es besser:):):):)
Gruß
Achim H.

Forumthread: Formel verbessern

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread