日付表示書式指定 Format関数




Format(対象,format) 年月日時間の表示形式を変更する関数です。
date関数、Now関数やTime関数と組み合わせて日付、時間の表示形式を指定します。
西暦、和暦等でも表示できます。



文字 説明 備考
/(スラッシュ) 年月日の区切り位置 -
:(コロン) 時間の区切り位置 -
年月日・時間の既定の表記 -
y 01/01から数えた日数 1~366
yy 西暦下2桁 0~99
yyyy 西暦4桁 0~9999
m 1~12
mm 01~12
mmm 月(英語表記略称3文字) -
mmmm 月(英語表記) -
d 1~31
dd 01~31
ddd 曜日(英語表記略称3文字) -
dddd 曜日(英語表記) -
h 時間 0~23
hh 時間 00~23
n 0~59
nn 00~59
s 0~59
ss 00~59
AM/PM
am/pm
AM・PM(am・pm)を表記
hと併用で0~12時間表記
00~59
ss 00~59
g 和暦年号ローマ字1文字 M、T、S、H
gg 和暦年号漢字1文字 明、大、昭、平
ggg 和暦年号漢字 明治、大正、昭和、平成
e 和暦年 1~99
ee 和暦年 01~99
q 四半期 (1月→1)
Long Date yyyy年mm月dd日 表記 -
Long Time hh:nn:ss 表記 -
Format一覧


Format関数での結果はエクセルのセル上で必ずしも表現されるわけではないようです。
違いは例を参照してください。


例)エクセルに表示(元のセルの書式は標準)
Sub YMDhms()
    'サンプル
    Range("A2") = Format(Date, "yyyy/mm/dd")
    Range("A3") = Format(Time, "hh:mm:ss")
    Range("A4") = Format(Date, "c")
    '日付
    Range("A5") = Format(Date, "y")
    Range("A6") = Format(Date, "yy")
    Range("A7") = Format(Date, "yyyy")
    Range("A8") = Format(Date, "m")
    Range("A9") = Format(Date, "mm")
    Range("A10") = Format(Date + 80, "mmm")
    Range("A11") = Format(Date, "mmmm")
    Range("A12") = Format(Date, "d")
    Range("A13") = Format(Date, "dd")
    Range("A14") = Format(Date, "ddd")
    Range("A15") = Format(Date, "dddd")
    '時間
    Range("A16") = Format(Time, "h")
    Range("A17") = Format(Time, "hh")
    Range("A18") = Format(Time, "n")
    Range("A19") = Format(Time, "nn")
    Range("A20") = Format(Time, "s")
    Range("A21") = Format(Time, "ss")
    Range("A22") = Format(Time, "AM/PM")
    Range("A23") = Format(Time, "am/pm hh:mm")
    '和暦
    Range("A24") = Format(Date, "g")
    Range("A25") = Format(Date, "gg")
    Range("A26") = Format(Date, "ggg")
    Range("A27") = Format(Date, "e")
    Range("A28") = Format(Date, "ee")
    Range("A29") = Format(Date, "q")
    'その他
    Range("A30") = Format(Date, "Long Date")
    Range("A31") = Format(Time, "Long Time")
End Sub



例)debug.printに表示
Sub YMDhms2()
    'サンプル
    Debug.Print Format(Date, "yyyy/mm/dd")
    Debug.Print Format(Time, "hh:mm:ss")
    Debug.Print Format(Date, "c")
    '日付
    Debug.Print Format(Date, "y")
    Debug.Print Format(Date, "yy")
    Debug.Print Format(Date, "yyyy")
    Debug.Print Format(Date, "m")
    Debug.Print Format(Date, "mm")
    Debug.Print Format(Date + 80, "mmm")
    Debug.Print Format(Date, "mmmm")
    Debug.Print Format(Date, "d")
    Debug.Print Format(Date, "dd")
    Debug.Print Format(Date, "ddd")
    Debug.Print Format(Date, "dddd")
    '時間
    Debug.Print Format(Time, "h")
    Debug.Print Format(Time, "hh")
    Debug.Print Format(Time, "n")
    Debug.Print Format(Time, "nn")
    Debug.Print Format(Time, "s")
    Debug.Print Format(Time, "ss")
    Debug.Print Format(Time, "AM/PM")
    Debug.Print Format(Time, "am/pm hh:mm")
    '和暦
    Debug.Print Format(Date, "g")
    Debug.Print Format(Date, "gg")
    Debug.Print Format(Date, "ggg")
    Debug.Print Format(Date, "e")
    Debug.Print Format(Date, "ee")
    Debug.Print Format(Date, "q")
    'その他
    Debug.Print Format(Date, "Long Date")
    Debug.Print Format(Time, "Long Time")
End Sub