如何在Power BI中设置周五为每周起始日并创建双周间隔？

因为原生WEEKDAY()函数仅支持将周六、周日、周一设为一周起始，要实现以周五为起始的双周间隔，可通过以下两种方式解决：

1. 公式计算（无需VBA） #

计算自定义周数（周五为起始） #

对于目标日期单元格A1，使用以下公式得到以周五为一周起始的周数：

=INT((A1 + 3 - DATE(YEAR(A1 + 3), 1, 1))/7) + 1

原理：通过给日期加3天，将周五映射为“虚拟周一”，再基于当年元旦计算周数，确保周五作为新一周的起点。

分组为双周 #

基于上述周数，用以下公式将日期归类到对应的双周组：

=INT((INT((A1 + 3 - DATE(YEAR(A1 + 3), 1, 1))/7) + 1)/2)

结果相同的数值即为同一双周内的日期。

获取双周的起始/结束日期 #

选定任意基准周五（比如2024-09-13），使用以下公式得到当前日期所属双周的起始周五：

=A1 - MOD(A1 - DATE(2024,9,13),14)

双周的结束日期（下周四）则为：

=(A1 - MOD(A1 - DATE(2024,9,13),14)) + 13

2. VBA自定义函数（更灵活） #

如果需要更直观的函数调用，可添加以下VBA代码：

' 计算以周五为起始日的单周数
Function CustomWeekNum(dateVal As Date) As Integer
    Dim firstFriday As Date
    firstFriday = DateSerial(Year(dateVal), 1, 1)
    ' 定位当年第一个周五
    Do While Weekday(firstFriday, vbFriday) <> 1
        firstFriday = firstFriday + 1
    Loop
    CustomWeekNum = Int((dateVal - firstFriday) / 7) + 1
End Function

' 计算以周五为起始日的双周数
Function BiWeekNum(dateVal As Date) As Integer
    BiWeekNum = Int((CustomWeekNum(dateVal) - 1) / 2) + 1
End Function

使用时直接在单元格输入=CustomWeekNum(A1)或=BiWeekNum(A1)即可得到对应周数/双周数。

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