Access / Excel VBA：获取与上周对应的两个日期

Question

我想我可以通过循环执行此操作，但由于我将其与MS Access结合使用，我想知道是否有快速方法可以执行此操作。

现在是2014年4月3日。我希望能够返回对应于前一周的周日和周六的日期。

例如，上周将于3月23日（星期日）至3月29日（星期六）举行。

Answer 1

上周日：

=A1-WEEKDAY(A1)-6

星期六

=A1-WEEKDAY(A1)

Answer 2

在Excel公式中：

=TODAY()-WEEKDAY(TODAY())-6  'Sunday of last week
=TODAY()-WEEKDAY(TODAY())    'Saturday of last week
=TODAY()-WEEKDAY(TODAY())+6  'Friday of current week

在VBA中：

Date()-Weekday(Date())-6     'Sunday of last week
Date()-Weekday(Date())       'Saturday of last week
Date()-Weekday(Date())+6     'Friday of current week