Uge misk mask ved brug af Format$

The formnat function has parameters to do this for you


Format Function

Returns a Variant (String) containing an expression formatted according to instructions contained in a format expression.

Syntax

Format(expression[, format[, firstdayofweek[, firstweekofyear]]])

The Format function syntax has these parts:

Part Description
expression Required. Any valid expression.
format Optional. A valid named or user-defined format expression.
firstdayofweek Optional. A constant that specifies the first day of the week.
firstweekofyear Optional. A constant that specifies the first week of the year.

Settings

The firstdayofweek argument has these settings:

Constant Value Description
vbUseSystem 0 Use NLS API setting.
VbSunday 1 Sunday (default)
vbMonday 2 Monday
vbTuesday 3 Tuesday
vbWednesday 4 Wednesday
vbThursday 5 Thursday
vbFriday 6 Friday
vbSaturday 7 Saturday

The firstweekofyear argument has these settings:

Constant Value Description
vbUseSystem 0 Use 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 year.
vbFirstFullWeek 3 Start with the first full week of the year.

So format(date,"ww", vbMandag,vbMonday) should work

terry

Der går nogle dage inden jeg får set på dit forslag.

no problem Ingolf

I can see that the example I gave is actually wrong :o(

format(date,"ww", vbMandag,vbFirstFourDays )

this isnt going so well must be Mondag :o)

format(date,"ww", vbMonday,vbFirstFourDays )

Or

format(date,"ww", 2,2)

format(date,"ww", 2,2) fungerer fint terry

Tak for svaret.

selv tak Ingolf