Excel – 根据公式获取星期开始date

我有这个function保存为一个macros：

Function getWeekdayStartDate(ActualDate As Date) As Date Dim WeekdayStartDate As Date WeekdayStartDate = DateValue(DateAdd("d", -Weekday(ActualDate, vbFriday) + 1, ActualDate)) getWeekdayStartDate = WeekdayStartDate End Function 

这给了我一个会计期间第一天的date。
本周的第一天不是星期一，而是星期五。

我试过这些公式：

 =DATE(2016; 6; 1)-WEEKDAY(DATE(2016; 6; 1)-6) =DATE(2016;6;24)+1-WEEKDAY(DATE(2016;6;24);15) 

得到这个date，但没有运气。

任何想法如何将此function转换为Excel公式？

Answer 1

如果你只是想让你的公式得到最接近指定date的星期五的date（但总是在之前），那么你几乎已经用你的第二个公式了，你只需要在公式的第二部分加1：

 =DATE(2016;6;24)+1-WEEKDAY(DATE(2016;6;24)+1;16) 

Answer 2

WORKDAY.INTL（Start_date，Days，Optional Weekend，Optional Holidays）与标准工作日（Start_date，Days，Optional Holidays）不同，因为您可以指定不同的周末date， 包括反映自定义工作周的string 。

在B2使用

 =WORKDAY.INTL(A2,1,"1111011") 

如果A2有date，则1在下周五返回，-1在上周五返回。 在1111011string中，1代表星期一开始的非工作日，而0代表工作日 – 在本例中为星期五。