Default = seneste søndag

Sakset fra Developers handbook:

Function FirstOfWeek(Optional dato As Date) As Date
'Assuming Sunday is first day of week.
If CLng(dato) = 0 Then
dato = Date
End If
FirstOfWeek = dato - Weekday(dato) + 1
End Function

Hvod dato er navnet på det felt der beregnes på.

Hej Mugs ... det var det, takker

Selv tak - Og tak for point.