Susan Harkins
ssharkins at bellsouth.net
Tue Apr 20 09:36:20 CDT 2004
Try this. 1. Create a static function in a module: Static Function FirstDayOfWeek(Optional DOW As Long = -1) As Long Dim lngDOWStore As Long If DOW > -1 Then lngDOWStore = DOW End If FirstDayOfWeek = lngDOWStore End Function ============I already have a function and it works. You're just moving the function call from the query to the report, but if there's a good development reason for doing so I'm open to it. Susan H.