構文
Format(expression, format[, firstdayofweek[, firstweekofyear]])
expression・・・・・・・書式を設定したいシリアル値・値
format・・・・・・・・・設定したい書式
firstdayofweek・・・・週の始まりの曜日を表す定数を指定【省略可能】※下記参照
firstweekofyear・・・・年度の第一週を表す定数を指定【省略可能】※下記参照
format・・・・・・・・・設定したい書式
firstdayofweek・・・・週の始まりの曜日を表す定数を指定【省略可能】※下記参照
firstweekofyear・・・・年度の第一週を表す定数を指定【省略可能】※下記参照
引数firstdayofweekに設定する定数 | ||
定数 | 値 | 内容 |
vbUseSystem | 0 | 各言語対応(NLS API)の設定値 |
vbSunday | 1 | 日曜【規定値】 |
vbMonday | 2 | 月曜 |
vbTuesday | 3 | 火曜 |
vbWednesday | 4 | 水曜 |
vbThursday | 5 | 木曜 |
vbFriday | 6 | 金曜 |
vbSaturday | 7 | 土曜 |
引数firstweekofyearに設定する定数 | ||
定数 | 値 | 内容 |
vbUseSystem | 0 | 各言語対応(NLS API)の設定値 |
vbFirstJan1 | 1 | 1 月 1 日を含む週を年度の第 1 週とする【規定値】 |
vbFirstFourDays | 2 | 7 日のうち少なくとも 4 日が新年度に含まれる週を年度の第 1 週とする |
vbFirstFullWeek | 3 | 全体が新年度に含まれる最初の週を、年度の第 1 週とする |
Format関数のサンプルコード
Public Sub sample() '■日付や時刻のサンプル Debug.Print Format(Now(), "yyyy-mm-dd") '2021-08-14 Debug.Print Format(Now(), "hh:mm:ss") '09:00:00 Debug.Print Format(Now(), "aaaa") '日曜日 Debug.Print Format(Now(), "ggge年") '令和3年 '■数値のサンプル Debug.Print Format(10000, "###,###") '10,000 Debug.Print Format(1, "00000") '00001 End Sub
注意点
- 引数Formatに設定する一覧表はこちら。
- 基本はエクセルのTEXT関数とほぼ同様です。
- セルに反映時にはセルの表示形式が文字列に変更しておきましょう。
※文字列以外は、セル側の表示形式で設定されてしまう為、Format関数が利用できません。
コメント