文字列の内容 Format関数 数値・文字列の表示

Format関数は日付や数値など表示形式を設定する場合に使用します。

Format関数の数値・文字列の表示の使用例について説明します。

Format関数の構文

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

Format(日付や数値などの文字列, [書式指定式], [週の最初の曜日], [年内の最初の週])

[]内は省略可能です。

Formatの内容

日付・時刻以外の書式をユーザーで定義する場合の内容です。

文字説明
0桁の位置や桁数を設定する
対応する桁の位置に数値がない場合、ゼロ(0)が表示される
#桁の位置や桁数を設定する
対応する桁の位置に数値がない場合は何も表示されない
¥円記号(¥)の次の文字をそのまま表示する
「¥¥」とすると、円記号を表示できる
@1つの文字やスペースを設定する
文字列より「@」の数が多い場合、先頭に空白を付けて表示される
&1つの文字を設定する
文字列より「&」の数が多い場合、文字列だけが左揃えで表示される
<アルファベットを小文字に変換する
>アルファベットを大文字に変換する
!文字を左から右に埋める
他のユーザー定義と組み合わせる

Format関数の使用例

・0を設定する

・#を設定する

・¥を設定する

・@を設定する

・&を設定する

・<を設定する

・>を設定する

・!を設定する

の内容で説明をしていきます。

0を設定する

対応する桁の位置に数値がない場合、ゼロ(0)が表示される。

Sub Format数値1()

    MsgBox Format(1234, "00000")
    
End Sub

数値は4桁で、桁数は5桁です。

先頭に0が付き5桁が表示されました。

Sub Format数値2()

    MsgBox Format(1234, "000")
    
End Sub

数値は4桁で、桁数は3桁です。

4桁が表示されました。

#を設定する

対応する桁の位置に数値がない場合は何も表示されない。

Sub Format数値3()

    MsgBox Format(1234, "#####")
    
End Sub

数値は4桁で、#は5桁です。

4桁が表示されました。

Sub Format数値4()

    MsgBox Format(1234, "###")
    
End Sub

数値は4桁で、#は3桁です。

4桁が表示されました。

¥を設定する

円記号(¥)の次の文字をそのまま表示する。

先頭に¥を付けたい。

Sub Format文字1()

    MsgBox Format(1234, "¥¥###00")
    
End Sub

先頭に¥が表示されました。

¥を1つにした場合。

Sub Format文字2()

    MsgBox Format(1234, "¥###00")
    
End Sub

¥の後に#が設定されているため#が表示されます。

@を設定する

文字列より「@」の数が多い場合、先頭に空白を付けて表示される

Sub Format文字3()

    MsgBox "あいう" + Format("えお", "@@@")
    
End Sub

“えお”を@@@で表示する様に設定します。

“えお”の前に空白が表示されました。

Sub Format文字4()

    MsgBox "あいう" + Format("えお", "@")
    
End Sub

“えお”を@で表示する様に設定します。

“あいうえお”と表示されました。

&を設定する

文字列より「&」の数が多い場合、文字列だけが左揃えで表示される。

Sub Format文字5()

    MsgBox "あいう" + Format("えお", "&&&")
    
End Sub

“えお”を&&&で表示する様に設定します。

“あいうえお”と表示されました。

Sub Format文字6()

    MsgBox "あいう" + Format("えお", "&")
    
End Sub

“えお”を&で表示する様に設定します。

“あいうえお”と表示されました。

<を設定する

アルファベットを小文字に変換する。

Sub Format文字7()

    MsgBox Format("AbCdE", "<")
    
End Sub

“ACE”が大文字、”bd”が小文字です。

全ての文字が小文字で表示されました。

>を設定する

アルファベットを大文字に変換する。

Sub Format文字8()

    MsgBox Format("AbCdE", ">")
    
End Sub

“ACE”が大文字、”bd”が小文字です。

全ての文字が大文字で表示されました。

!を設定する

文字を左から右に埋める。

!を使用しない場合

Sub Format文字9()

    MsgBox "あいう" + Format("えお", "@@@") + "かき"
    
End Sub

@は文字数以上設定していると空白になるので”え”の前に空白が入ります。

!を使用した場合

Sub Format文字10()

    MsgBox "あいう" + Format("えお", "!@@@") + "かき"
    
End Sub

!を使用することによって左埋めになり”お”の後に空白が入ります。

今回はFormat関数の数値・文字列の表示について記載させて頂きました。

少しでも皆様の参考になれば幸いです。

文字列の内容 Format関数 日付関連の使用例

Format関数は日付や数値など表示形式を設定する場合に使用します。

Format関数の使用例について説明します。

Format関数の定義済みの内容などの説明は前回の内容を参考に確認お願い致します。

Format関数の構文

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

Format(日付や数値などの文字列, [書式指定式], [週の最初の曜日], [年内の最初の週])

[]内は省略可能です。

Format関数の使用例

・定義済みの書式で日付を表示(Long Date)

・定義済みの書式で日付を表示(Medium Date)

・定義済みの書式で日付を表示(Short Date)

・定義済みの書式で日付を表示(Long Time)

・定義済みの書式で日付を表示(Medium Time)

・定義済みの書式で日付を表示(Short Time)

・日付1桁の場合、先頭に0は付けない

・日付1桁の場合、先頭に0を付ける

・英語(省略形)表記の曜日

・日本語(省略形)表記の曜日

・英語表記の曜日

・日本語表記の曜日

・年、月、日を含むyyyy/mm/dd形式の日付を表示

・日本の場合は年月日で日付を表示

・曜日を表す数値

・その日が一年のうちで何週目かを表す数値

・月1桁の場合、先頭に0は付けない

・月1桁の場合、先頭に0を付ける

・英語(省略形)表記の月の名前

・英語表記の月の名前

・日本語表記の月の名前

・1年のうちで何番目の四半期かを表す数値

・年号の頭文字

・年号の頭文字の漢字1文字

・年号

・年号に基づく和暦1桁の場合、先頭に0は付けない

・年号に基づく和暦1桁の場合、先頭に0を付ける

・1年のうちで何日目かを表す数値

・西暦年の下2桁の数値

・西暦年の4桁の数値

・時間1桁の場合、先頭に0は付けない

・時間1桁の場合、先頭に0は付ける

・分1桁の場合、先頭に0は付けない

・分1桁の場合、先頭に0を付ける

・秒1桁の場合、先頭に0は付けない

・秒1桁の場合、先頭に0を付ける

・h:nn:ss形式の時刻

・AM/PM表記

・am/pm表記

・A/P表記

・a/p表記

・FirstDayOfWeekの設定方法

・FirstWeekOfYearの設定方法

の内容で説明をしていきます。

定義済みの書式で日付を表示(Long Date)

Sub format1()

    MsgBox Format("2022/04/03 16:49:45", "Long Date")
    
End Sub

定義済みの書式で日付を表示(Medium Date)

Sub format2()

    MsgBox Format("2022/04/03 16:49:45", "Medium Date")
    
End Sub

定義済みの書式で日付を表示(Short Date)

Sub format3()

    MsgBox Format("2022/04/03 16:49:45", "Short Date")
    
End Sub

定義済みの書式で日付を表示(Long Time)

Sub format4()

    MsgBox Format("2022/04/03 16:49:45", "Long Time")
    
End Sub

定義済みの書式で日付を表示(Medium Time)

Sub format5()

    MsgBox Format("2022/04/03 16:49:45", "Medium Time")
    
End Sub

定義済みの書式で日付を表示(Short Time)

Sub format6()

    MsgBox Format("2022/04/03 16:49:45", "Short Time")
    
End Sub

日付1桁の場合、先頭に0は付けない

Sub format7()

    MsgBox Format("2022/04/03", "d")
    
End Sub

日付1桁の場合、先頭に0を付ける

Sub format8()

    MsgBox Format("2022/04/03", "dd")
    
End Sub

英語(省略形)表記の曜日

Sub format9()

    MsgBox Format("2022/04/03", "ddd")
    
End Sub

日本語(省略形)表記の曜日

Sub format10()

    MsgBox Format("2022/04/03", "aaa")
    
End Sub

英語表記の曜日

Sub format11()

    MsgBox Format("2022/04/03", "dddd")
    
End Sub

日本語表記の曜日

Sub format12()

    MsgBox Format("2022/04/03", "aaaa")
    
End Sub

年、月、日を含むyyyy/mm/dd形式の日付を表示

Sub format13()

    MsgBox Format("2022年04月03日", "ddddd")
    
End Sub

日本の場合は年月日で日付を表示

Sub format14()

    MsgBox Format("2022/04/03", "dddddd")
    
End Sub

曜日を表す数値

日曜日が1、土曜日が7

Sub format15()

    MsgBox Format("2022/04/03", "w")
    
End Sub

その日が一年のうちで何週目かを表す数値

Sub format16()

    MsgBox Format("2022/04/03", "ww")
    
End Sub

月1桁の場合、先頭に0は付けない

Sub format17()

    MsgBox Format("2022/04/03", "m")
    
End Sub

月1桁の場合、先頭に0を付ける

Sub format18()

    MsgBox Format("2022/4/03", "mm")
    
End Sub

英語(省略形)表記の月の名前

Sub format19()

    MsgBox Format("2022/4/03", "mmm")
    
End Sub

英語表記の月の名前

Sub format20()

    MsgBox Format("2022/4/03", "mmmm")
    
End Sub

日本語表記の月の名前

Sub format21()

    MsgBox Format("2022/4/03", "oooo")
    
End Sub

1年のうちで何番目の四半期かを表す数値

Sub format22()

    MsgBox Format("2022/4/03", "q")
    
End Sub

年号の頭文字

Sub format23()

    MsgBox Format("2022/4/03", "g")
    
End Sub

年号の頭文字の漢字1文字

Sub format24()

    MsgBox Format("2022/4/03", "gg")
    
End Sub

年号

Sub format25()

    MsgBox Format("2022/4/03", "ggg")
    
End Sub

年号に基づく和暦1桁の場合、先頭に0は付けない

Sub format26()

    MsgBox Format("2022/4/03", "e")
    
End Sub

年号に基づく和暦 1桁の場合、先頭に0を付ける

Sub format27()

    MsgBox Format("2022/04/03", "ee")
    
End Sub

1年のうちで何日目かを表す数値

Sub format28()

    MsgBox Format("2022/04/03", "y")
    
End Sub

西暦年の下2桁の数値

Sub format29()

    MsgBox Format("2022/04/03", "yy")
    
End Sub

西暦年の4桁の数値

Sub format30()

    MsgBox Format("2022/04/03", "yyyy")
    
End Sub

時間1桁の場合、先頭に0は付けない

Sub format31()

    MsgBox Format("06:49:45", "h")
    
End Sub

時間1桁の場合、先頭に0は付ける

Sub format32()

    MsgBox Format("6:49:45", "hh")
    
End Sub

分1桁の場合、先頭に0は付けない

Sub format33()

    MsgBox Format("06:09:45", "n")
    
End Sub

分1桁の場合、先頭に0を付ける

Sub format34()

    MsgBox Format("06:9:45", "nn")
    
End Sub

秒1桁の場合、先頭に0は付けない

Sub format35()

    MsgBox Format("06:49:05", "s")
    
End Sub

秒1桁の場合、先頭に0を付ける

Sub format36()

    MsgBox Format("06:49:5", "ss")
    
End Sub

h:nn:ss形式の時刻

Sub format37()

    MsgBox Format("06:49:5", "ttttt")
    
End Sub

AM/PM表記

Sub format38()

    MsgBox Format("06:49:05", "AM/PM")
    
End Sub

am/pm表記

Sub format39()

    MsgBox Format("16:49:05", "am/pm")
    
End Sub

A/P表記

Sub format40()

    MsgBox Format("06:49:05", "A/P")
    
End Sub

a/p表記

Sub format41()

    MsgBox Format("16:49:05", "a/p")
    
End Sub

FirstDayOfWeekの設定方法

日曜日が 1(規定)、土曜日が 7

通常の場合

Sub format42()

    MsgBox Format("2022/04/04", "w")
    
End Sub

2022/04/04は月曜日のため2が表示されます。

月曜日を週の始まりとして設定

Sub format43()

    MsgBox Format("2022/04/04", "w", 2)
    
End Sub

規定値を2(月曜日)に設定したので戻り値が1になりました。

FirstWeekOfYearの設定方法

2022年1月前半のカレンダーです。

規定として1 月 1 日が含まれる週から開始します。

Sub format44()

    MsgBox Format("2022/01/2", "ww")
    
End Sub

2022/1/2は2週目なので、2が戻り値です。

定数説明
vbFirstJan111 月 1 日が含まれる週から開始します (既定)。
vbFirstFourDays24 日以上が含まれる最初の週が年の第 1 週目になります。
vbFirstFullWeek31 週間全体が含まれる最初の週がその年の第 1 週目になります。

FirstWeekOfYearの値を3に設定します。

Sub format45()

    MsgBox Format("2022/01/2", "ww", , 3)
    
End Sub

1 週間全体が含まれる最初の週がその年の第 1 週目になりますので、1が戻り値です。

今回はFormat関数の日付関連の使用例について記載させて頂きました。

次回はFormat関数の数値関連について記載していきます。

少しでも皆様の参考になれば幸いです。