VBAでフォント (文字) の色を変更する方法！RGB・ColorIndexで簡単設定

「VBAでフォントの色を変更したいけど、どうすればいいの？」
このように悩んだことはありませんか？

・VBAでフォントの色を変更するにはどうすればいいの？

・RGBで色を細かく設定する方法が知りたい！

・条件によって文字の色を自動で変える方法は？

その場合は、VBAの「Font.Colorプロパティ」を
使用すると解決します！

この記事では、「Font.Colorプロパティ」 を使ってセルのフォントの色を変更する方法を、初心者でも理解できるように詳しく解説します。

VBAを使えば、条件に応じた色の変更 や 特定の色を取得して他のセルに適用する など、手作業では面倒な処理を一瞬で実行できます。

「VBAは難しそう…」と思っている方も、この記事を読めばスムーズに理解できますよ！
ぜひ最後まで読んで、Excel作業をもっと便利にしてみましょう！ 😊✨

【　この記事の概要　】

VBAをしっかり学びたいけれど、「どこから始めればいいかわからない」と迷っていませんか？

そんな方には、UdemyのVBA講座がおすすめです。

動画での丁寧な解説や、実践的な学習スタイルで、初心者でも無理なく基礎から応用まで習得できます。
自己学習を進める上で、何度でも繰り返し見返せる講座は非常に心強い味方になりますよ！

＼ 　自分のペースで学べるVBA講座はこちら　 ／

【 Udemy 】初心者でも安心！VBA講座を見る

​

この記事でできるようになること

VBAでフォントの色を変更するとどんなことが便利になる？

VBAでフォントの色を変更するのは
通常の変更となにか違うの？

VBAを使ってフォントの色を変更すると、
Excel作業がもっと便利になります！
例えば、次のようなことが簡単にできるようになりますよ。

このように、手作業での色付けを自動化できるので、作業の効率がグッと上がります！

VBAでフォントの色を変更する基本方法 | Font.Colorプロパティ・Font.ColorIndexプロパティ

VBAでセル内のフォント（文字）の色を変更するには、
「Font.Colorプロパティ」 または 「Font.ColorIndexプロパティ」 を使用します。

① VBAでフォントの色を自由に変更する方法【Font.Colorプロパティ】

VBAでフォントの色を細かく指定して変更するには、「Font.Colorプロパティ」 を使用します。
このプロパティを使うと、「RGB(赤, 緑, 青) 関数」 を利用して自由に色を設定できます。

Excel VBAで「フォントの色を変更・取得」する際に、最もよく使われるプロパティなので、ぜひ覚えておきましょう！

Font.Colorプロパティの構成について

このように、Font.Colorプロパティ を使用すると、「RGB関数」や「定数」を使って細かくフォントの色を変更できます。

さらに詳細な仕様については、Microsoft公式のFont.Color プロパティ (Excel)を参照してください。

🎨 主要なRGBカラー & VBA定数一覧

Font.Colorプロパティでは、RGB(赤, 緑, 青) 関数 を使って色を指定するだけでなく、vbRed や vbBlue などの「定数」も使用できます。

以下に、主な色の指定方法をまとめました！

色名	具体的な色	RGB関数	VBA定数
赤		RGB(255, 0, 0)	vbRed
緑		RGB(0, 255, 0)	vbGreen
青		RGB(0, 0, 255)	vbBlue
黄色		RGB(255, 255, 0)	vbYellow
黒		RGB(0, 0, 0)	vbBlack
灰色		RGB(128, 128, 128)	vbGray
白		RGB(255, 255, 255)	vbWhite
シアン（水色）		RGB(0, 255, 255)	vbCyan
マゼンタ（紫）		RGB(255, 0, 255)	vbMagenta

② VBAでカラーパレットから色を選択する方法【Font.ColorIndexプロパティ】

VBAでは、「Font.ColorIndexプロパティ」 を使うことで、Excelの標準カラーパレット（1〜56） を利用してフォントの色を設定できます。

RGB関数を使う方法と異なり、決まった色だけを簡単に指定できます。

Font.ColorIndexプロパティの構成について

さらに詳細な仕様については、Microsoft公式のFont.ColorIndex プロパティ (Excel)を参照してください。

🎨 ColorIndexで指定できる主な色一覧

Font.ColorIndexプロパティを使えば、Excelの標準カラーを番号で指定できます。

色名	具体的な色	ColorIndex
赤		3
緑		4
青		5
黄色		6
黒		1
灰色		15
白		2
シアン（水色）		8
マゼンタ（紫）		13

VBAでフォントの色を変更する際の注意ポイント3つ！エラーや制限を回避する方法

VBAでフォントの色を変更する際には、いくつかの制約や注意点 があります。
特に、「透明化ができない」「ColorIndexの色が限られている」など、知らないとハマるポイントもあるので、事前にチェックしておきましょう！

⚠️ ① フォントの透明化はできない！

VBAでは、セルの背景色（Interior.ColorIndex = xlNone）を透明にすることはできますが、フォントの色を「透明」にすることはできません。

Range("A1").Font.ColorIndex = xlNone '//  無効（フォントには適用不可）

Range("A1").Font.ColorIndex = -4142  '//  無効（効果なし）

フォントの透明化は不可能！「透明に見せる」工夫が必要

⚠️ ② Font.ColorIndex で指定できる色は限られている

Font.ColorIndexを使う場合、Excelの標準カラーパレット（1〜56）の色しか指定できません。
これは Excelの決まったカラーパレットを使用する仕様 なので、自由に色を設定したい場合はFont.Colorを使う必要があります。

Range("A1").Font.ColorIndex = 5 '// 青色（標準パレットの5番目）

ColorIndexは簡単に色を指定できるが、自由度が低い！

Range("A1").Font.Color = RGB(123, 200, 255) '// RGBで好きな色を指定

⚠️ ③ 条件付き書式と競合する可能性がある

VBAで Font.Color や Font.ColorIndex を使ってフォントの色を変更しても、条件付き書式（Excelの「書式ルール」）が設定されているセルでは、条件付き書式が優先される場合があります。

対策 : どのようにしたらいい？

Range("A1").FormatConditions.Delete '// 条件付き書式を削除

VBAでセルの色塗りを使った使用例をご紹介 | Font.Color・Font.ColorIndex

ここからは、VBAでフォントの色変更を使用した代表的なコード例を紹介します。

以下に紹介する使用例は、すべてコピペしてすぐに実行できるコードです。
気になる例は、ぜひご覧いただき、実際に実行してみてください。

VBAをしっかり学びたいけれど、「どこから始めればいいかわからない」と迷っていませんか？

そんな方には、UdemyのVBA講座がおすすめです。

動画での丁寧な解説や、実践的な学習スタイルで、初心者でも無理なく基礎から応用まで習得できます。
自己学習を進める上で、何度でも繰り返し見返せる講座は非常に心強い味方になりますよ！

＼ 　自分のペースで学べるVBA講座はこちら　 ／

【 Udemy 】初心者でも安心！VBA講座を見る

​

使用例1: 売上データの数値に応じてフォントの色を変更

売上データが一定の閾値（しきいち）を超えた場合にフォントの色を自動で変更する例をご紹介します。
例えば、売上が「80以上なら青」、「50未満なら赤」、「それ以外は黒」に設定します。
このようなコードは、売上データの可視化や異常値の識別に役立ちます。

コード例 | セルの値に応じたフォント色の変更

Sub ChangeFontColorBySales()
    Dim rng As Range
    Dim cell As Range

    '// 対象範囲を指定（A1:A10の範囲）
    Set rng = Range("A2:A10")

    '// 範囲内の各セルをループ
    For Each cell In rng
        '// セルが空白でない場合のみ処理
        If Not IsEmpty(cell.Value) And IsNumeric(cell.Value) Then
            '// 条件分岐
            Select Case cell.Value
                Case Is >= 80  '// 80以上なら青
                    cell.Font.Color = RGB(0, 0, 255)
                Case Is < 50  '// 50未満なら赤
                    cell.Font.Color = RGB(255, 0, 0)
                Case Else      '// 50以上80未満なら黒
                    cell.Font.Color = RGB(0, 0, 0)
            End Select
        End If
    Next cell
End Sub

処理結果

コードの動作概要

このコードで使用している機能

1行ずつコードを解説

総括・ポイント

使用例2: 指定したキーワードを含むセルのフォント色を変更

このコードでは、指定したキーワードを含むセルのフォント色を自動で変更します。
このように、「重要」や「エラー」などの特定の単語を含むセルのフォントを赤色にすることで、重要な情報を一目で識別しやすくすることができます。

コード例 | 特定のキーワードを含むセルのフォント色を変更

Sub ChangeFontColorByKeyword()
    Dim rng As Range
    Dim cell As Range
    Dim keyword As String

    '// 検索するキーワードを指定
    keyword = "エラー"

    '// 対象範囲を指定（A1:A10の範囲）
    Set rng = Range("A1:A10")

    '// 範囲内の各セルをループ
    For Each cell In rng
        '// セルが空白でない場合のみ処理
        If Not IsEmpty(cell.Value) Then
            '// セルの値にキーワードが含まれているか判定
            If InStr(cell.Value, keyword) > 0 Then
                cell.Font.Color = RGB(255, 0, 0) '// 赤色に変更
            End If
        End If
    Next cell
End Sub

処理結果

コードの動作概要

このコードで使用している機能

1行ずつコードを解説

総括・ポイント

使用例3: 文字の一部分のみフォントの色を変更

このコードでは、セル内の文字列の一部分だけフォントの色を変更 します。
例えば、「重要: データエラー」 のようなセルがある場合、「重要:」の部分だけを赤色にすることが可能です。

コード例 | 文字の一部分だけフォント色を変更

Sub ChangePartialFontColor()
    Dim rng As Range
    
    '// 対象のセルを指定
    Set rng = Range("A1")
    
    '// A1セルに文字列を入力（サンプル）
    rng.Value = "重要: データエラー"

    '// 文字列の先頭5文字（「重要: 」）のフォント色を赤に変更
    rng.Characters(1, 3).Font.Color = RGB(255, 0, 0)
End Sub

処理結果

コードの動作概要

このコードで使用している機能

1行ずつコードを解説

総括・ポイント

この記事のまとめ

この記事では、VBAを使用してフォントの色を変更する方法 について詳しく解説しました。
Font.Colorプロパティ を使えば、フォントの色を RGB値や定数 で自由に変更できます。
また、 Font.ColorIndexプロパティ を使用すると、Excelの標準カラーパレット を活用して色を設定できます。

さらに、フォントの色を変更する際の注意点 や、実際の業務で役立つ使用例 も紹介しました。
VBAを活用することで、手作業での色付けを自動化し、Excel作業を効率化できます！ 🚀✨

ポイントのおさらい

パーフェクトExcel VBA (PERFECT SERIES)

¥3,608 （2024/11/23 13:14時点 | Amazon調べ）

Amazonで探す

楽天市場で探す

Yahooショッピングで探す

ポチップ

さらに学ぶために

VBAのフォント色変更を学んだら、次は関連するVBAの便利な機能を学んでみましょう！
以下の機能や方法と組み合わせると、Excel作業をさらに効率化できます。

あわせて読みたい

サイトマップ このページは、本サイトの記事を分かりやすくまとめました。ぜひご覧ください。 目次 「VBA」を見る 「Officeスクリプト」を見る 「ワークシート関数」を見る 「JavaScr...