時刻の書式

Excel VBA を使って時刻の書式を設定する方法について解説します。時刻の書式は時や分をどのように表示するかで書式用の文字を組み合わせて利用します。

(Last modified: )

時分秒の書式

時分秒については次の通りです。

書式パーツ対象表示
h時間21:8:5321
hh時間21:8:5321
m分21:8:538
mm分21:8:5308
s秒21:8:5353
ss秒21:8:5353

「m」や「mm」は月の書式文字と同じですが、「h」や「s」などと一緒に使うことで分を表す書式文字として使えます。

実際に試してみます。 

Sub テスト()
    
    Range("A1:A2").Value = "08:12:06"
    Range("A1").NumberFormatLocal = "h:m:s"
    Range("A2").NumberFormatLocal = "hh:mm:ss"
    
    Range("A3:A4").Value = "21:05:36"
    Range("A3").NumberFormatLocal = "h:m:s"
    Range("A4").NumberFormatLocal = "hh:mm:ss"
        
End Sub

上記マクロを実行すると次のようになります。

時刻の書式

AM/PMの書式

時刻は24時間表記となってますが、「AM/PM」を追加で記述すると12時間表記とすることもできます。例えば次のように記述します。 

Range("A2").NumberFormatLocal = "hh:mm:ss AM/PM"

このようにAM/PMを追加することで、時間は12時間表記に変わり、午前または午後に応じてAMまたはPMが表示されます。

実際に試してみます。 

Sub テスト()
    
    Range("A1:A2").Value = "08:12:06"
    Range("A1").NumberFormatLocal = "hh:mm:ss AM/PM"
    Range("A2").NumberFormatLocal = "hh:mm:ss"
    
    Range("A3:A4").Value = "21:05:36"
    Range("A3").NumberFormatLocal = "hh:mm:ss AM/PM"
    Range("A4").NumberFormatLocal = "hh:mm:ss"
        
End Sub

上記マクロを実行すると次のようになります。

時刻の書式

時刻の場合でも、好きな文字を書式の間に記述することが出来ます。

-- --

Excel VBA を使って時刻の書式を設定する方法について解説しました。

( Written by Tatsuo Ikura )

プロフィール画像

著者 / TATSUO IKURA

これから IT 関連の知識を学ばれる方を対象に、色々な言語でのプログラミング方法や関連する技術、開発環境構築などに関する解説サイトを運営しています。