使用日期函数计算工作日

Question

下面是我的SQL代码，用于计算报告的工作日。 我正在尝试使用VBA Excel获得相同的结果。

set @end_date = DATEADD(DD,-DATEPART(dw,GETDATE())+1,GETDATE())
set @begin_date = DATEADD(DD,-6,@end_date)

我尝试了这个：

endDate = DateAdd("D", -DatePart("W", DateValue(Now)) + 1, "DateValue(Now)")
startDate = DateAdd("D", -6, "endDate")

但是我无法得到结果！

Answer 1

如果我在Now之后添加括号并从DateAdd函数的最后一个输入和endDate变量中删除引号，则能够获得相同的输出。 引号使代码认为您正在传递字符串而不是函数或变量。

因此，您的VBA如下所示：

endDate = DateAdd("D", -DatePart("W", DateValue(Now())) + 1, DateValue(Now()))

startDate = DateAdd("D", -6, endDate)