Excel中 - 獲取本週日開始日期爲公式

Question

我有這個功能保存宏：

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(2016; 6; 1)-WEEKDAY(DATE(2016; 6; 1)-6) 
=DATE(2016;6;24)+1-WEEKDAY(DATE(2016;6;24);15) 

獲取此日期，但沒有運氣。

任何想法如何將此功能轉換爲Excel公式？

Answer 1

如果你只是想你的公式得到最接近指定日期（但總是前），那麼你幾乎與你的第二個公式有了它，你只需要1添加到公式的第二部分週五的日期太：

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

Answer 2

WORKDAY.INTL（開始日期，日，可選週末，節假日可選），從該標準WORKDAY（開始日期，日，節假日可選）不同，你可以指定不同的週末兩天包括字符串反映定製工作周。

在B2使用

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

其中A2有日期，1點返回下週五和-1回報上週五。在1111011字符串中，1代表星期一開始的非工作日，而0代表工作日 - 在本例中爲星期五。