Excel VBA - 查找上个月的最后一个星期五日期

Question

嗨，因为我是excel宏的新手，我在编写语法时遇到了一些困难。

我想在单元格中显示上个月的上个星期五日期。

如果我在12月份发布一份报告（2017年12月22日），它应该在一个单元格中显示11月的最后一个星期五日期（即：24/11/2017）。

请有人帮我解决这个问题。

Answer 1

实现此目的的Excel公式将是

=NOW()-DAY(NOW())+1-WEEKDAY(NOW()-DAY(NOW()),15)

等效的VBA公式

Range("A2").Value = CDate(Now() - Day(Now()) + 1 - Weekday(Now() - Day(Now()), vbFriday))