在MS Project中设置无需VBA的滚动两周前瞻筛选器，以两周后周五为截止日

核心日期计算逻辑 #

无需VBA，直接用MS Project内置日期函数组合自动计算两周后的周五作为筛选截止日，公式如下：

DateAdd("d", 14 + (5 - Weekday(Now(), vbFriday)), Now())

公式拆解：

• Weekday(Now(), vbFriday)：将周五设为一周起始日，返回当前日期对应的星期序号（周五=1、周六=2…周四=7）
• 5 - Weekday(Now(), vbFriday)：计算当前日期到下一个周五的剩余天数（当天是周五则结果为0，周一则为4）
• 叠加14天（两周）后，通过DateAdd得到最终的两周后周五截止日期

筛选器设置步骤 #

1. 打开MS Project，切换到视图选项卡，点击「筛选器」下拉菜单，选择「新筛选器」
2. 在「筛选器定义」窗口中配置：
   • 筛选器名称：输入「滚动两周至周五前瞻」（自定义名称即可）
   • 域名称：选择需筛选的日期字段，比如开始时间（若要筛选完成时间则选「完成时间」）
   • 测试：选择「小于或等于」
   • 值：粘贴上述公式
   • 勾选「显示在菜单中」，方便后续快速调用
3. 点击「确定」完成保存

效果验证 #

• 6月10日（周六）运行筛选：截止日自动计算为6月28日（周五），显示所有开始时间≤6月28日的任务
• 6月11日-14日（周日至周三）运行：截止日仍为6月28日，保持筛选范围一致，契合业务人员按周规划的思维习惯
• 每次调用筛选器时，公式会自动重新计算截止日期，支持随时生成符合要求的报表

内容的提问来源于stack exchange，提问作者Miles