weeknumber

Hej.

Du skal bruge datepart, kig i hjælpen efter parametrenes anvendelse, der er rigtig mange

ugenr = DatePart(\"ww\", Now, 2, 3)

M.v.h.  Jørn

text2.text = DatePart(\"ww\", Now())

Betydninger:
------------
\"ww\": Det er ugenummeret vi er interesseret i
Now(): Datoen der skal bruges til at beregne ugenummeret

Derudover kan du specificere yderligere to parametre der bestemmer hvilken dag der er ugens første, og hvornår årets første uge begynder, men jeg brugte bare lige defaults :)

WOW... Jeg havde ikke lige set svaret før jeg sendte... My bad, men nu er det da dobbelt-bekræftet :) Hehe

Ja, det sker ofte.  Vi får måske 7½ point hver.  M.v.h.  Jørn

Jeg går ud fra, at joerns tal 2,3 er disse parametre. Jeg kan ikke umiddelbart se effekten, idet svaret virker også uden 2,3.
Det er første gang jeg spørger her, og kender ikke
praksis, men joern var først og jeg accepterer.

PS Tak for hjælpen!
mvh lillehans

Hej igen.

Tak for point. Ugenummeret bliver ikke korrekt på alle ugens dage med mindre du angiver parametre for danske (europæiske) forhold.  I USA er søndag ugens dag 1, vi bruger mandag.  Der er også forskelle på hvorledes uge 1 beregnes, i DK er det første uge med en onsdag efter 31/12.

vbUseSystem    0    Use the NLS API setting.
vbFirstJan1    1    Start with week in which January 1 occurs (default).
vbFirstFourDays    2    Start with the first week that has at least four days in the new year.
vbFirstFullWeek    3    Start with first full week of the year.

Så på nogle af ugens dage og i 4 år ud af 7 går den uden parametre!

M.v.h.  Jørn