Microsoft Excel

Herbers Excel/VBA-Archiv

Kalenderwoche

Betrifft: Kalenderwoche von: Nico
Geschrieben am: 25.08.2004 12:22:16

Hallo an Alle Excelianer,


sacht mal, hat die Funktion =Kalenderwoche()nen Fehler oder muss ich da noch irgendwas anderes schreiben, denn...

Nehmt mal den 04.01.04, dies ist bekanntlich ein Sonntag - der erste Sonntag im Jahr 2004 und somit auch der Sonntag der 1.KW 04. Excel schmeißt mir jedoch die KW 2 aus, woran liegt das?

Danke für ne Info

Nico

  


Betrifft: AW: Kalenderwoche von: Günther Oppold
Geschrieben am: 25.08.2004 12:27:41

Hi Nico

das liegt daran dass EXCEL nach amerikanischem Muster die KW ermittelt und nicht nach DIN.

so gehts:

Tabelle1
 CD
104.01.20041. KW
205.01.20042. KW
306.01.20042. KW
Formeln der Tabelle
D1 : =KÜRZEN((C1-WOCHENTAG(C1;2)-DATUM(JAHR(C1+4-WOCHENTAG(C1;2));1;-10))/7)&". KW"
D2 : =KÜRZEN((C2-WOCHENTAG(C2;2)-DATUM(JAHR(C2+4-WOCHENTAG(C2;2));1;-10))/7)&". KW"
D3 : =KÜRZEN((C3-WOCHENTAG(C3;2)-DATUM(JAHR(C3+4-WOCHENTAG(C3;2));1;-10))/7)&". KW"
Excel Tabellen einfach im Web darstellen   Excel Jeanie HTML  2.0    Download  

Günther

  


Betrifft: AW: Kalenderwoche von: Magic
Geschrieben am: 25.08.2004 12:29:09

Hallo Nico,

das liegt daran, dass der Sonntag im englischsprachigen Raum der erste Tag der Woche ist.

Wenn Du diese Funktion in deine Personl.xls speicherst kannst bekommst Du mit kWoche(DAtum) für den 04.01.04 die 1. KW angezeigt und für den 5.1. die 2.:

Public
Function KWoche(datum As Date)
KWoche = Format(datum, "WW", vbMonday, vbFirstFourDays)
End Function


Gruß
Michael

p.s. Der Code ist nicht von mir sondern bei einem Seminar abgeschrieben. THX to R.Gill


  


Betrifft: AW: Kalenderwoche von: Nico
Geschrieben am: 25.08.2004 12:30:52

DANKESCHÖN. MAN LERNT NIE AUS.


 

Beiträge aus den Excel-Beispielen zum Thema "Kalenderwoche"