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

Question

关闭。这个问题需要details or clarity .它目前不接受答案。












想改进这个问题？通过 editing this post 添加详细信息并澄清问题.


4年前关闭。







Improve this question




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

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

如果我在 12 月份运行报告，比如说(2017 年 12 月 22 日)，它应该在单元格 A2 中显示 11 月的最后一个星期五日期(即:2017 年 11 月 24 日)。

有人可以帮我解决这个问题。

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))