Code Snippets → Find Previous / Next Sunday

Code courtesy of Bob Askew (raskew on Access World Forums).

Find previous Sunday

Function GetPrevSunday(dteDate As Date) As Date
    GetPrevSunday = DateAdd("d", -Weekday(dteDate) + 1, dteDate)
End Function

Find next Sunday

Function GetNextSunday(dteDate As Date) As Date
    GetNextSunday = DateAdd("d", -Weekday(dteDate) + 8, dteDate)
End Function