VBA～時刻の表示形式を設定しよう～Excel

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

:(コロン)区切り

Sub test1()

Range("A1").NumberFormatLocal = "h:mm:ss"

End Sub

時分秒表示

Sub test2()

Range("A1").NumberFormatLocal = "h時mm分ss秒"

End Sub

AM/PM表示

Sub test3()

Range("A1").NumberFormatLocal = "h:mm:ss AM/PM"

End Sub

秒なし表示

Sub test4()

Range("A1").NumberFormatLocal = "h:mm"

End Sub

範囲に表示形式を設定

範囲を指定したい時はRange("範囲の左上のセル:範囲の右下のセル")で指定できます。 下のコードを実行するとセルA1からセルA3の時刻がAM/PM表示に設定されます。

Sub test5()

Range("A1:A3").NumberFormatLocal = "h:mm:ss AM/PM"

End Sub