VBA获取上一个工作日的日期

【问题标题】：VBA to get the date of the Previous WorkdayVBA获取上一个工作日的日期
【发布时间】：2017-05-10 17:18:19
【问题描述】：

我正在尝试获取今天的上一个工作日。假设今天是星期三，那么前一个工作日将是星期二，但如果今天是星期一，那么前一个工作日将是星期五。如何获取前一个工作日的日期？

谢谢

【问题讨论】：

【解决方案1】：

考虑：

=WORKDAY(TODAY(),-1)

这个公式可以很容易地修改来处理假期。

在 VBA 中：

Sub dural()
    MsgBox CDate(Evaluate("WORKDAY(TODAY(),-1)"))
End Sub

【讨论】：

【解决方案2】：

值得一提的是，这个函数也可以处理公共假期，但是这个参数是可选的。所以事实上我们有：

=WORKDAY(TODAY(),-1, 'Range with Public Holidays Dates')

例如：

=WORKDAY(TODAY(),-1, A1:A10)

【讨论】：