VBA～日付の表示形式を設定しよう～Excel

VBAでセルに表示形式を設定したい時はRange.NumberFormatLocalプロパティで設定できます。Range("セル番地").NumberFormatLocal = "表示形式"で設定できます。

/(スラッシュ)区切り西暦

Sub test1()

Range("A1").NumberFormatLocal = "yyyy/m/d(aaa)"

End Sub

年月日表示の西暦

Sub test2()

Range("A1").NumberFormatLocal = "yyyy年m月d日"

End Sub

和暦

Sub test3()

Range("A1").NumberFormatLocal = "ggge年m月d日"

End Sub

曜日付き表示

Sub test4()

Range("A1").NumberFormatLocal = "yyyy/m/d(aaa)"

End Sub

範囲に表示形式を設定

範囲を指定したい時はRange("範囲の左上のセル:範囲の右下のセル")で指定できます。 下のコードを実行するとセルA1からセルA3の日付が曜日付きの書式に設定されます。

Sub test5()

Range("A1:A3").NumberFormatLocal = "yyyy/m/d(aaa)"

End Sub