【VBA道場】#6 セルの表示形式を設定！（円マークとカンマをつけよう）

問題
完成見本
解答
サンプルファイル（マクロ有）
1. VBA道場6 サンプルファイル（マクロ有）
解説
おわりに
おすすめ参考書
1. Amazon
2. 楽天

問題

A1セルに表示されている「3298」を「￥3,298」と表示せよ

完成見本

解答

Sub vba_doujyou_6()

　　’A1セルの値に円マークとカンマを付ける
　　Sheets("Sheet1").Range("A1").NumberFormatLocal = "\#,###"

End Sub

サンプルファイル（マクロ有）

今回のマクロはこちらからダウンロードしてご使用いただけます。

VBA道場6 サンプルファイル（マクロ有）

1 ファイル 13.63 KB

ダウンロード

解説

object.NunberFormatLocal = string
object：対象となるRangeオブジェクト
string：表示形式

セルに表示形式を設定するには、NumberFormatLocalプロパティに、書式記号を設定します。
書式記号は、「セルの書式設定」の中の「表示形式」でユーザー定義を設定する際に使用
する記号です。

今回の場合、￥記号と3桁カンマを設定しましたが、その場合は下記の通りになります。

Sheets("Sheet1").Range("A1").NumberFormatLocal = "\#,###"

その他の例は下記の通りです。

Range.NumberFormatLocal = "@" 　　 '文字列
Range.NumberFormatLocal = "#,###"　 '3桁ずつカンマ区切り
Range.NumberFormatLocal = "0.00"　 '小数点２桁固定
Range.NumberFormatLocal = "yyyy/mm/dd" '月・日を２桁で表示（年は4桁）