WEEKNUM ??

Uge nr 53 (2009) går fra 28/12-03/01
Uge nr 01 (2010) går fra 04/01-10/01

carlt'
Jeg er klar over det du skriver, men excel funktionen WEEKNUM retunrer som det jeg har skrevet.
Altså den deler uge 53 & 1 i uge 53

Har du set dette:
Kopieret fra hjælpen i Excel (dansk 2007). Det giver vel svaret??

UGE.NR
Vis alt
Skjul alt
Returnerer et tal, der angiver ugenummeret.

Vigtigt!  Funktionen UGE.NR betragter den uge, som 1. januar indgår i, som den første uge i året. Der findes imidlertid en europæisk standard, som definerer den første uge i det nye år som den, der har flest dage (fire eller derover). Dette betyder, at i år, hvor der er tre eller færre dage i den første uge af januar, returnerer funktioen UGE.NR ugenumre, som er ukorrekte i forhold til den europæiske standard.

Function WeekNumber(year As Integer, mon As Integer, day As Integer) As Integer
    Dim a, y, m, JD, d4, L, d1 As Long
    a = (14 - mon) \ 12
    y = year + 4800 - a
    m = mon + 12 * a - 3
    JD = day + (153 * m + 2) \ 5 + 365 * y + y \ 4 - y \ 100 + y \ 400 - 32045
    d4 = (((JD + 31741 - JD Mod 7) Mod 146097) Mod 36524) Mod 1461
    L = d4 \ 1460
    d1 = ((d4 - L) Mod 365) + L
    WeekNumber = d1 \ 7 + 1
End Function

kand udregne korrekt ISO 8601 uge nummer.

Det kan klares med følgende formel:
=INT((A1-(DATE(YEAR(A1+(MOD(8-WEEKDAY(A1);7)-3));1;1))-3+MOD(WEEKDAY(DATE(YEAR(A1+(MOD(8-WEEKDAY(A1);7)-3));1;1))+1;7))/7)+1

Eller på dansk:
=HELTAL((A1-(DATO(ÅR(A1+(REST(8-UGEDAG(A1);7)-3));1;1))-3+REST(UGEDAG(DATO(ÅR(A1+(REST(8-UGEDAG(A1);7)-3));1;1))+1;7))/7)+1