Kalenderwoche für den 4.1.2010 ist laut Excel die 2. - Korrekt ist die erste
Walter Heying
ich habe eben gerade festgestellt, dass Excel bei dem 4.1.2010 die 2.
Kalenderwoche ausgibt. Ich habe folgende Funktion angegeben:
=KALENDERWOCHE(DATUM(2010;1;4);2)
Woran liegt das? Kennt Excel die Regel: Wenn die letzte Woche mehr als
3 Tage im alten Jahr liegen, dann gibt es eine 53. KW, ansonsten
laufen die max. 3 Tage des alten Jahres in die 1. KW des Folgejahres.
Wer kann mir helfen?
Gruß
Walter
Andreas Killer
> ich habe eben gerade festgestellt, dass Excel bei dem 4.1.2010 die 2.
> Kalenderwoche ausgibt. Ich habe folgende Funktion angegeben:
> =KALENDERWOCHE(DATUM(2010;1;4);2)
> Woran liegt das? Kennt Excel die Regel: Wenn die letzte Woche mehr als
KALENDERWOCHE rechnet nach AMI-Standard.
Nimm die angeh�ngte, die rechnet Deutsch.
Der Code muss in ein normales Modul, wie's geht steht hier:
http://www.online-excel.de/excel/singsel_vba.php?f=44#s2
Andreas.
Function KW(ByVal Datum As Date) As Integer
'Liefert die Kalenderwoche f�r Datum
Dim T As Long
T = DateSerial(Year(Datum + (8 - Weekday(Datum)) Mod 7 - 3), 1, 1)
KW = ((Datum - T - 3 + (Weekday(T) + 1) Mod 7)) \ 7 + 1
End Function
Alexander Wolff
lie�
Walter Heying verlautbaren, evtl. nachfolgend zitiert:
> ich habe eben gerade festgestellt, dass Excel bei dem 4.1.2010 die 2.
> Kalenderwoche ausgibt. Ich habe folgende Funktion angegeben:
> =KALENDERWOCHE(DATUM(2010;1;4);2)
http://excelformeln.de/formeln.html?welcher=7 sagt was dazu und hilft
--
Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2
Walter Heying
> Walter Heying schrieb:
>
> > ich habe eben gerade festgestellt, dass Excel bei dem 4.1.2010 die 2.
> > Kalenderwoche ausgibt. Ich habe folgende Funktion angegeben:
> > =KALENDERWOCHE(DATUM(2010;1;4);2)
> > Woran liegt das? Kennt Excel die Regel: Wenn die letzte Woche mehr als
>
> KALENDERWOCHE rechnet nach AMI-Standard.
>
>
> Der Code muss in ein normales Modul, wie's geht steht hier:http://www.online-excel.de/excel/singsel_vba.php?f=44#s2
>
> Andreas.
>
> Function KW(ByVal Datum As Date) As Integer
> Dim T As Long
> T = DateSerial(Year(Datum + (8 - Weekday(Datum)) Mod 7 - 3), 1, 1)
> KW = ((Datum - T - 3 + (Weekday(T) + 1) Mod 7)) \ 7 + 1
> End Function
VIELEN DANK FÜR DIE SCHNELLE HILFE!!!
Karsten Awizio
hier sind zwei Loesungen, die europaeische Kalenderwoche zu ermitteln (ohne Makro).
Loesung 1 (ohne ueberlappenden Jahreswechsel):
==============================================
=WEEKNUM(A1;2)-1*(WEEKNUM(DATUM(JAHR(A1);1;4);2)=2)
Es ergibt die Zahl der europaeischen (=deutschen) Kalenderwoche (typ. 1..52). Wenn das Jahr mit KW52 bzw. KW53 beginnt (ueberlappende letzte KW des Vorjahres), dann wird diese durch KW00 ersetzt. Bsp.: 01.01.2010 ergibt KW00, 04.01.2010 ergibt KW01.
Loesung 2 (mit ueberlappendem Jahreswechsel):
==============================================
=KUERZEN((A1-WOCHENTAG(A1;2)-DATUM(JAHR(A1+4-WOCHENTAG(A1;2));1;-10))/7)
Wenn das Jahr mit KW52 bzw. KW53 beginnt, dann wird diese auch ausgegeben. Bsp.: 01.01.2010 ergibt KW53, 04.01.2010 ergibt KW01.
Viele Gruesse,
Karsten
> On Tuesday, November 24, 2009 10:07 AM Andreas Killer wrote:
> Walter Heying schrieb:
>
> KALENDERWOCHE rechnet nach AMI-Standard.
>
> Nimm die angeh?ngte, die rechnet Deutsch.
>
> Der Code muss in ein normales Modul, wie's geht steht hier:
> http://www.online-excel.de/excel/singsel_vba.php?f=44#s2
>
> Andreas.
>
> Function KW(ByVal Datum As Date) As Integer
> 'Liefert die Kalenderwoche f?r Datum
> Dim T As Long
> T = DateSerial(Year(Datum + (8 - Weekday(Datum)) Mod 7 - 3), 1, 1)
> KW = ((Datum - T - 3 + (Weekday(T) + 1) Mod 7)) \ 7 + 1
> End Function
>> On Tuesday, November 24, 2009 10:14 AM Alexander Wolff wrote:
>> lie?
>> Walter Heying verlautbaren, evtl. nachfolgend zitiert:
>>
>>
>> http://excelformeln.de/formeln.html?welcher=7 sagt was dazu und hilft
>> --
>> Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2
>>> On Tuesday, November 24, 2009 1:34 PM Walter Heying wrote:
>>> Hallo Spezialisten,
>>>
>>> ich habe eben gerade festgestellt, dass Excel bei dem 4.1.2010 die 2.
>>> Kalenderwoche ausgibt. Ich habe folgende Funktion angegeben:
>>> =3DKALENDERWOCHE(DATUM(2010;1;4);2)
>>> Woran liegt das? Kennt Excel die Regel: Wenn die letzte Woche mehr als
>>> 3 Tage im alten Jahr liegen, dann gibt es eine 53. KW, ansonsten
>>> laufen die max. 3 Tage des alten Jahres in die 1. KW des Folgejahres.
>>>
>>> Wer kann mir helfen?
>>>
>>> Gru=DF
>>> Walter
>>>> On Tuesday, November 24, 2009 1:34 PM Walter Heying wrote:
>>>> ine-excel.de/excel/singsel_vba.php?f=3D44#s2
>>>> 1)
>>>>
>>>> VIELEN DANK F=DCR DIE SCHNELLE HILFE!!!