マイナスを赤で表示」という検索で、このサイト・インストラクターのネタ帳へのアクセスがありました。Applications)から、マイナスの値・負の値を、赤色で表示する設定にするにはどのようなコードを書けばいいのかを探していた方による検索でしょうか。[スポンサードリンク]マイナスの値を赤色で表示するサンプルマクロ以下のSubプロシージャを実行すると、アクティブセルの値が、マイナスの場合に赤色で表示される、ユーザー定義書式が設定されます。SubRangeオブジェクトのNumberFormatLocalプロパティに、Excelでユーザー定義書式を設定するのと同じ文字列を指定すればOKです。上記のマクロを実行してユーザー定義書式を設定したセルの[表示形式]タブを確認すると、下図のような状態になっているはずです。[セルの書式設定]ダイアログから、手作業でユーザー定義書式を設定したのと同じです。[赤]-0"というオブジェクト式にすれば、A1:A5セルの書式設定を一気にできます。「.NumberFormatLocal」の前、Rangeオブジェクトを取得するオブジェクト式で、ユーザー定義書式を設定するセルを指定します。マイナスの値を赤色の桁区切りカンマつきで表示するサンプルマクロ以下のようなSubプロシージャにすれば、マイナスの値を赤色、桁区切りカンマつきで表示できます。Sub上記のマクロで書式設定したセルの[表示形式]タブを確認すると、下図のような状態になっているはずです。Range.NumberFormatLocalプロパティに、[セルの書式設定]ダイアログ-[表示形式]タブでユーザー定義書式を設定するのと同じ文字列を指定するだけです。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。