Access / Excel VBA：获取上周对应的两个date

我想我可以做一个循环，但由于我与MS Access一起使用这个问题，我想知道是否有一个快速的方法来做到这一点。

现在是2014年4月3日。我希望能够返回与前一周相同的星期日和星期六的date。

例如上周三月二十三日（星期天）到三月二十九日（星期六）。

Answer 1

在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 

Answer 2

上周日：

 =A1-WEEKDAY(A1)-6 

星期六

 =A1-WEEKDAY(A1)