EXCEL VBA - 今天是今年的第幾週?

 

需  求

在EXCEL VBA中,需要知道某個日期或是今天是今年的第幾週?

範  例

Sub 今天是第幾週() 


        Range("B2").FormulaR1C1 = Application.Evaluate("WeekNum(TODAY())")


End Sub

 

說  明:

以下為EXCEL函數

  • WeekNum() :傳回特定日期的週數。 例如,包含 1 月 1 日的該週是該年的第一週,因此會編號為第 1 週。
  • TODAY():傳回目前的日期。
  • Application.Evaluate可以讓EXCEL裡面的函數執行

 

結  果:

實際執行如下圖,也符合我們的預期的在B2欄位出現在週別。

EXCEL VBA - 今天是今年的第幾週?

 

 


arrow
arrow
    全站熱搜

    News123 發表在 痞客邦 留言(0) 人氣()