Excel自动填充每周日期：跨年度与多周月份的自动适配需求问询

核心解决方案（Excel 365/2021 动态数组版） #

直接将以下动态数组公式输入到A4单元格，公式会自动生成完整的季度标题、月份标题和每周四日期，更换B1的年份时会实时更新，完全适配5周的月份：

=LET(
    yr,B1,
    firstThu,DATE(yr,1,1)+(4-WEEKDAY(DATE(yr,1,1),2)+7)%7,
    allThus,SEQUENCE(DATEDIF(firstThu,DATE(yr,12,31),"W")+1,1,firstThu,7),
    sorted,BYROW(allThus,LAMBDA(d,LET(
        m,MONTH(d),
        q,CEILING(m/3,1),
        prevD,IF(ROW(d)=ROW(allThus),DATE(yr,1,0),INDEX(allThus,ROW(d)-ROW(allThus))),
        prevQ,CEILING(MONTH(prevD)/3,1),
        prevM,MONTH(prevD),
        out,IF(q<>prevQ,{"Q"&q,""},IF(m<>prevM,{TEXT(d,"mmmm"),""},{"",d})),
        out
    ))),
    final,VSTACK({"Q1",""},{TEXT(DATE(yr,1,1),"mmmm"),""},sorted),
    UNIQUE(final,TRUE)
)

公式说明 #

1. 基础日期生成：先计算B1指定年份的第一个周四，再生成全年所有周四的日期序列，确保周度间隔固定为7天。
2. 自动插入标题行：遍历每个周四日期，对比上一个日期的季度/月份属性，自动在新季度开头插入Qx行，新月份开头插入月份名称行（如January）。
3. 适配5周月份：完全基于日期的月份属性判断分组，不会因月份周数差异导致填充错误。

关于O3单元格的引用 #

如果需要将O3作为参数（如偏移量、基准调整值等），只需在公式对应位置替换即可。例如若O3是年份偏移，可将yr,B1改为yr,B1+O3，具体根据实际需求调整。

旧版Excel兼容方案（无动态数组） #

若使用不支持动态数组的旧版Excel，可拆分以下步骤操作：

1. 生成第一个周四：在B4输入=DATE(B1,1,1)+(4-WEEKDAY(DATE(B1,1,1),2)+7)%7
2. 生成后续周四：在B5输入=B4+7，下拉填充至当年最后一个周四
3. A列月份/季度标识：
   • 在A4输入=IF(MONTH(B4)<>MONTH(B3),TEXT(B4,"mmmm"),IF(AND(MONTH(B4)=1,MONTH(B3)=12),"Q1",""))
   • 在A5输入=LET(m,MONTH(B5),q,CEILING(m/3,1),IF(m<>MONTH(B4),TEXT(B5,"mmmm"),IF(q<>CEILING(MONTH(B4)/3,1),"Q"&q,"")))
   • 下拉填充A列，手动补充季度标题行（或用条件格式辅助标识）

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