VBA DatePart関数で年初来何周目を取得

DatePart関数で年初来何周目を取得

Sub test()
 

' DatePart関数で年初来何周目を取得

    Dim myDate As Date
    
    myDate = #5/13/2025#

    Debug.Print "対象日付は年初から数えて" & DatePart("ww", myDate) & "週目です。"

    

End Sub

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

関連記事

『VBA シート追加・削除』

『VBA シート移動・コピー』

『VBA セル値によって色を付ける』