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

日付(2020/11/25等)から
 ・曜日を取得
できます!

曜日は
 ・1文字(水など)
 ・3文字(水曜日など)
の形で取得できます!

VBA関数である
 ・Format関数
により取得できます!

PR

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

「Format関数」により「曜日」を取得します。
※「Format関数」の2つ目の引数に
 ・aaa」を指定することで、「曜日(1文字)」
 ・aaaa」を指定することで、「曜日(3文字)」
を取得できます。

PR

実行結果

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

曜日(1文字)を取得
曜日(1文字)を取得
曜日(3文字)を取得
曜日(3文字)を取得
PR

参考①

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

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

PR

参考②

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

●Format関数

タイトルとURLをコピーしました