VBAで小数点以下を表示する

対象：Excel2007, Excel2010, Excel2013, Windows版Excel2016

「excel vba 小数点以下表示」
「excel vba 小数点第二位まで表示」
「マクロ式で小数点を表示させるには?」
といった検索でのアクセスが割とあります。

Excel VBAで、小数を含む数値の表示形式を設定する方法を探していらした、検索キーワードです。

結論からいえば、RangeオブジェクトのNumberFormatLocalプロパティに、

Excel.Range.NumberFormatLocal

［セルの書式設定］ダイアログ－［表示形式］タブで指定するのと同じ書式文字列を指定すれば、

［セルの書式設定］ダイアログ－［表示形式］タブでユーザー定義書式「#,##0.00」を設定

OKです。

［スポンサードリンク］

具体的なサンプルをいくつかご紹介しておきます。

小数点以下第2位まで表示するサンプル

以下のSubプロシージャを実行すると、A1セルに入力された数値が、小数点以下第2位まで表示されます。

Sub 小数点以下第2位まで表示()
　Range("A1").NumberFormatLocal = "0.00"
End Sub

もちろん、
　　Range("A1").NumberFormatLocal = "0.0"
で第1位まで、
　　Range("A1").NumberFormatLocal = "0.000"
で第3位まで表示されます。

以下のSubプロシージャを実行すると、A2セルに入力された数値が、小数点以下第2位まで表示され、桁区切りカンマも表示されます。

Sub 小数点以下第2位まで表示して桁区切りカンマを入れる()
　Range("A2").NumberFormatLocal = "#,##0.00"
End Sub

「excel vba 小数マイナスを赤で表示」
といった検索キーワードでのアクセスもあります。
その場合、以下のようなSubプロシージャです。

Sub 小数点以下第2位まで表示して桁区切りカンマを入れてマイナスは赤色で()
　Range("A3").NumberFormatLocal = "#,##0.00; [赤]-#,##0.00"
End Sub

A3セルに入力された数値が、小数点以下第2位まで表示され、桁区切りカンマも表示され、マイナスは赤色になります。

RangeオブジェクトのNumberFormatLocalプロパティを使うというところは、Excel VBAの話ですが、設定する書式文字列は、Excelでユーザー定義書式を設定する知識です。

最終更新日時：2018-10-04 15:11

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

「表示形式」の記事一覧