Uge nr?

datediff("w", 01-01-99, dato) tror jeg.

datediff("ww", dato1, dato2, wbMonday, vbFirstFourDays) kan anvendes.. takker

100 point!

S! I stedet for at lave en kommentar, bør du lave et svar hvis du vil have pointene.

Denne her virker perfekt:

Ugenr = Format(Dato, "ww", vbMonday, vbFirstFourDays)

Hmm... jeg var ikke 100% sikker da jeg ikke kender så meget til VB. Men jeg kender da en hel del til VB-script/ASP. Og meget er jo det samme.
Men nu kan jeg i hvert fald ikke komme til at svare før du har afvist bkp's svar.

Helt seriøst så er det en omvej at bruge DateDiff i dette tilfælde, du skal jo ikke finde en difference men kun et ugenr.
Og desuden er det meget vigtigt at huske både vbMonday og vbFirstFourDays, ellers får du ikke ugenr efter dansk kalender men efter amerikansk kalender, og de er nemlig ikke ens, så Januskh og BKP rammer altså mere plet end s gør.
Og det siger jeg ikke for at virke klog, men det siger min erfaring mig.

Prøv dem og se hvorfor en der virker!! og giv point ud fra det!!

Januskh stilte da selv spørgsmålet...

Jo men han rettede dit svar!

Løsningen med format(dat...) den holder 100%, den anden holder i de fleste tilfælde, men der skal kodes en hel del ved siden af.

Derfor er fordelingen sket på denne måde... og hva fanden... det er jo fictive points...

Jeg er ligeglad med pointsne og jeg skal da også ærligt indrømme at jeg ikke er en haj til VB. Normalt sidder jeg kun med ASP/VBScript/Html.

ved brug af Ugenr = Format(Dato, "ww", vbMonday, vbFirstFourDays)
har man også taget højde for om ugen starter i året ?

= datepart("ww", now, 2, 2)

Det var en noget gammel tråd at svare i.

Iøvrigt plejer Windows funktionerne at regne forkert ugenummer ud i forhold til ISO selv om man bruger vbMonday og vbFirstFourDays, så man bør en formel som virker.