從系統日期的VBA週數

Question

我希望你能夠幫助我用一些代碼計算基於系統日期的星期數。 我有一個文本框WeekNum，我想顯示CommandButton1_Click激活時的星期編號。

我發現了關於如何計算給定日期的星期數的文章，但我不知道足夠的VBA將其更改爲系統日期。

任何幫助你可以提供將不勝感激！

Answer 1

VBA

Debug.Print Format(Now, "ww") 

FORMULA

=1+INT((TODAY()-(DATE(YEAR(TODAY()),1,2)-WEEKDAY(DATE(YEAR(TODAY()),1,1))))/7)