Home » Excel VBA Rangeオブジェクト » 表示形式 » VBAで小数点の位置を揃えて表示する基本

VBAで小数点の位置を揃えて表示する基本

動作検証バージョン:Windows 11 Home + 64bit Excel バージョン 2505(ビルド18827.20128クイック実行)

「excel vba 小数点で位置合わせ」
といった検索キーワードでアクセスがありました。

上図のように小数を含む数値のセルが並んでいるときに、下図のように小数点の位置を揃えて表示するには

どのようなコードを書けばいいのか調べていらしたのでしょう。

[スポンサードリンク]

小数点の位置を揃えて表示するサンプルマクロ

以下のExcelマクロが参考になるでしょう。

Sub 小数点の位置を揃えて表示する()
 Range("A1:A5").NumberFormatLocal = "0.???"
End Sub

サンプルマクロで行っている処理

[セルの書式設定]ダイニング-[表示形式]タブで「0.???」と指定すれば、小数点の位置が揃えられることを20年前に記事にしています。

この設定をVBAから行っているのが上記のマクロです。

Excel.RangeオブジェクトのNumberFormatLocalプロパティを使って、[セルの書式設定]ダイニング-[表示形式]タブで指定するのと同じ文字列「0.???」を設定しています。

ゼロパティングする場合

以下のようなコードにすれば、

 Range("A1:A5").NumberFormatLocal = "0.000"

下図のようにゼロパティングが行われます。

[スポンサードリンク]

Home » Excel VBA Rangeオブジェクト » 表示形式 » VBAで小数点の位置を揃えて表示する基本

「表示形式」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.