IIf(Weekday([HiredDate])=7,[HiredDate],[HiredDate]-Weekday([HiredDate])) AS TrainingStart, Date()+6-Weekday(Date()) AS EndOfWeek, DateDiff("ww",[TrainingStart],[EndOfWeek]) AS WeekNumber