Returnering af ugenummer fra dato

Du kan læse mere under hjælp i Excel...
UGE.NR
Se også

Returnerer et tal, der angiver ugenummeret.

Hvis denne funktion ikke er tilgængelig, skal du køre installationsprogrammet for at installere Analysis ToolPak. Når Analysis ToolPak er installeret, skal du aktivere programmet ved hjælp af kommandoen Tilføjelsesprogrammer i menuen Funktioner.

Sådan gør du

Syntaks

UGE.NR(serielt_tal;returner_type)

Serienr.  er en dato i en uge. Se afsnittet Bemærk!, hvis du ønsker yderligere oplysninger om, hvordan Microsoft Excel bruger serienumre til datoer.

Returner_type  er et tal, der bestemmer, hvilken ugedag ugen starter med. 1 er standard.

dette er formlen

=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

UGE.NR(serielt_tal;returner_type)

Returner_type  er et tal, der bestemmer, hvilken ugedag ugen starter med. 1 er standard.

Serienr                    Ugen starter
1 Ugen starter med søndag. Ugedage nummereres fra 1 til 7.
2 Ugen starter med mandag. Ugedage nummereres fra 1 til 7.


Fx.
Hvis datoen er søndag den 10. januar 1999:

UGE.NR("1/10/1999";1) er lig med 3

UGE.NR("1/10/1999";2) er lig med 2

UGE.NR("2005/08/31") er lig med 36

Hvis du ikke kan se UGE.NR funktionen, skal du installere Analysis Toolpak under Funktioner/Tilføjelsesprogrammer

hej med jer og tak for hjælpen. Jeg brugte boris løsning, chewies kunne også være interessant. Jeg havde forsøgt med hjælp i excel men uden held, fandt den dog nu. Jeg mener nilfri er meget tæt på boris derfor nul, men er i uenige vend venligst tilbage så kigger vi på det

Haha, ingen problemer.

Da jeg kiggede første gang, var der som jeg husker det, slet ikke den samme tekst fra Boris (kan man redigere et svar?).

Det vigtigste var self, at du fik hjælp!

:o) .... man kan ikke ændre et svar/kommentar :o)

Godt nytår

Tak for point.
Man kan kun redigere et svar, hvis man har adgang til Ekspertens database. (Det har jeg ikke)
Men det er ret menneskeligt at huske forkert.
Ergo er nilfri menneskelig.

Bemærk, at Excels UGE.NR funktion beregner efter amerikanske regler, som ikke er identisk med de skandinaviske regler.

UGE.NR funktionen kan derfor ikke anvendes i danske kalender-beregninger.

Kan man løse det i VB ??

Ja, og det kan også løses ved hjælp af en almindelig (langhåret) Excel-formel.

ellers kan man vel bruge en af flemmingdals løsninger

Function UgeNum(InputDate As Date)
'Returnerer ugenummeret ud fra en dato
    UgeNum = DatePart("ww", InputDate, vbMonday, vbFirstFourDays)
End Function




Function DagNavn(InputDate As Date)
'Returnerer dagens navn udfra en dato
Dim iDag As Integer
    iDag = DatePart("w", InputDate, vbMonday, vbFirstFourDays)
    Select Case iDag
        Case 1
            DagNavn = "Mandag"
        Case 2
            DagNavn = "Tirsdag"
        Case 3
            DagNavn = "Onsdag"
        Case 4
            DagNavn = "Torsdag"
        Case 5
            DagNavn = "Fredag"
        Case 6
            DagNavn = "Lørdag"
        Case 7
            DagNavn = "Søndag"
    End Select
End Function