【VBA】日付から曜日を取得する

VBAコード

ここでは例として、
　・「2020/11/25」の
　・「曜日(1文字)」と「曜日(3文字)」を取得
します。

Option Explicit

Sub sample()
    
    Dim targetDate As String
    Dim dayOfTheWeek As String
    
    '日付を指定
    targetDate = "2020/11/25"
    
    '曜日(1文字)を取得
    dayOfTheWeek = Format(targetDate, ("aaa"))
    MsgBox ("曜日は『" & dayOfTheWeek & "』です。")
    
    '曜日(3文字)を取得
    dayOfTheWeek = Format(targetDate, ("aaaa"))
    MsgBox ("曜日は『" & dayOfTheWeek & "』です。")
    
End Sub

実行結果

「曜日(1文字)」と「曜日(3文字)」を取得できました。

参考①

日付から曜日の英語表記も取得できます。

詳細は以下の記事をご確認ください。

参考②

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●Format関数