【VBA】曜日の英語表記を取得する

VBAで
　・曜日の英語表記を取得
できます！

英語表記は
　・省略された表記(wed等)
　・省略されていない表記(wednesday等)
を取得できます！
※wednesdayは水曜日です。

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

VBAコード
実行結果
参考①
参考②
参考③
参考④

VBAコード

ここでは例として
　・本日日付(＝2022/4/20の水曜日)の
　・曜日の英語表記(省略された表記)
　・曜日の英語表記(省略されていない表記)
を取得します。

Sub sample()

    '曜日の英語表記(省略された表記)を取得
    MsgBox Format(Date, "ddd")
    '曜日の英語表記(省略されていない表記)を取得
    MsgBox Format(Date, "dddd")

End Sub

「Date関数」で「本日日付」を取得します。

「Format関数」と「本日日付」を使用して、「曜日の英語表記」を取得します。
※「Format関数」の2つ目の引数に
　・「ddd」を指定することで、英語表記(省略された表記)
　・「dddd」を指定することで、英語表記(省略されていない表記)
を取得できます。

実行結果

本日日付から
　・曜日の英語表記(省略された表記)
　・曜日の英語表記(省略されていない表記)
を取得できました。

参考①

曜日の英語表記は「WorksheetFunction」オブジェクトの「Text」メソッドでも取得できます。
※「WorksheetFunction」オブジェクトの「Text」メソッドは、ワークシート関数の「Text関数」です。

ただ「Format関数」の方がシンプルと思うため、「Format関数」の使用をオススメします。

参考として「WorksheetFunction」オブジェクトの「Text」メソッドでも取得可能であることを知っておけば良いです。

Sub sample()

    '曜日の英語表記(省略された表記)を取得
    MsgBox WorksheetFunction.Text(Date, "ddd")
    '曜日の英語表記(省略されていない表記)を取得
    MsgBox WorksheetFunction.Text(Date, "dddd")

End Sub