hvilken ugedag er det?

Dim Ugedag As String
Dim Dato As String

Dato = Format(Date)
Ugedag = Format(Expression:=Dato, Format:="w")
Label1.Caption = Ugedag

sådan måske?

og hvis det skal være med mandag, tirsdag, onsdag så:

Dim Ugedag As String
Dim Dato As String

Dato = Format(Date)
Ugedag = Format(Expression:=Dato, Format:="dddd")
Label1.Caption = Ugedag


Casper // www.ildstorm.dk

perfekt :-)
takker

np, selv tak.