【VBA】Format関数の使い方

Format関数の使い方を紹介します。
Format関数は名前の通り、渡されたデータをフォーマットして返す関数です。

Format(Expression, [Format], [FirstDayOfWeek], [FirstWeekOfYear])

引数	説明
Expression	必ず指定が必要です。 フォーマットしたい値を設定します。
Format	省略可能です。 Expressionをどのようにフォーマットしたいかを設定します
FirstDayOfWeek	省略可能です。 週の最初の曜日を指定する定数です。
FirstWeekOfYear	省略可能です。 年内で最初の週を指定する定数です。

よく使う使い方を以下に記載します。

日付・時間のフォーマット

Option Explicit

Sub FormatDate()
    MsgBox ("now: " & Now)

    Dim formattedDate As String
    formattedDate = Format(Now, "yyyy年mm月dd日")

    MsgBox ("formattedDate : " & formattedDate)

    Dim formattedTime As String
    formattedTime = Format(Now, "hh時mm分ss秒")

    MsgBox ("formattedTime: " & formattedTime)
End Sub

現在の日付を “yyyy年mm月dd日” のフォーマットで表示、
現在の時刻を “hh時mm分ss秒” のフォーマットで表示するプログラムです

その他、日付のフォーマット記号は以下に記載があります。
https://learn.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/format-function-visual-basic-for-applications#date-symbols

時刻のフォーマット記号は以下です。
https://learn.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/format-function-visual-basic-for-applications#time-symbols

数値のフォーマット

Option Explicit

Sub FormatInt()
    Dim price As Long
    price = 1980000
    
    Dim formattedPrice As String
    formattedPrice = Format(price, "#,##0")

    MsgBox ("formattedPrice: " & formattedPrice)
End Sub

price（1980000）を “#,##0” のフォーマットで表示するプログラムです

その他

Option Explicit

Sub FormatOther()
    Dim id As Long
    id = 1
    
    Dim formattedId As String
    formattedId = Format(id, "000")

    MsgBox ("formattedId: " & formattedId)
End Sub

id（1）を “000” のフォーマットで表示するプログラムです