【Excel】数値を書式設定するマクロ

FormatNumber関数で数値を書式設定することができます。

例

1 2 3 4 5

Sub GetFormatNumber()       MsgBox FormatNumber(1200)       End Sub

第２引数以下の引数を省略すると、省略した引数の設定にはシステムの地域の設定が使用されます。

実行結果

表示する小数点以下の桁数を指定

第２引数に少数の桁数を指定できます。数値は四捨五入されるようです。

1 2 3 4 5

Sub GetFormatNumber()       MsgBox FormatNumber(200 / 3, 2)       End Sub

実行結果

小数値に先行ゼロを表示するかどうかの指定

第３引数で小数値に先行ゼロ（１以下の数値の場合の先頭の０という意味？）を表示させるかどうかを指定できます。

1 2 3 4 5

Sub GetFormatNumber()       MsgBox FormatNumber(0.056, 3, vbTrue)       End Sub

Trueを指定した場合。

実行結果

1 2 3 4 5

Sub GetFormatNumber()       MsgBox FormatNumber(0.056, 3, vbFalse)       End Sub

Falseを指定した場合。

実行結果

負の値をカッコで囲むかどうかの指定

第４引数で負の値をカッコで囲むかの指定ができます。

1 2 3 4 5

Sub GetFormatNumber()       MsgBox FormatNumber(-100, 0, vbTrue, vbTrue)       End Sub

Trueを指定。

実行結果

カッコで囲まれた形で表示されます。

区切り記号の表示

第５引数で桁の区切り記号を表示させるかどうかの指定が出来ます。

1 2 3 4 5

Sub GetFormatNumber()       MsgBox FormatNumber(1234567, 0, vbTrue, vbTrue, vbFalse)       End Sub

Falseを指定。

実行結果

カンマが無い状態で表示されます。



＜参考サイト＞
FormatNumber 関数 | Office VBA 言語リファレンス

スポンサーリンク

https://hosopro.blogspot.com/2017/07/excel-vba-formatnumber.html 【Excel】数値を書式設定するマクロ