【VBA】文字列の一部のみの色を変更する

VBAコード

ここでは例として、シート「sample」の
　・セル「B2」に設定されている文字列の
　・9桁目から6文字分を
　・赤色へ
変更します。

Option Explicit

Sub sample()
    'セル「B2」の文字列の一部のみの色を設定(9文字目から6文字分を赤色へ)
    Worksheets("sample").Range("B2").Characters(Start:=9, Length:=6).Font.Color = XlRgbColor.rgbRed
End Sub

実行結果

文字列の一部のみの色を変更できました。

参考①

上記のVBAコードで使用した以下のの詳細は、公式サイトをご確認ください。

●「Rangeオブジェクト」の「Characters」プロパティ

●「Charactersオブジェクト」の「Font」プロパティ

●「Fontオブジェクト」の「Color」プロパティ

参考②

上記のVBAコードでは、色の指定に列挙体「XlRgbColor」を使用しています。

列挙体「XlRgbColor」の詳細は、以下の記事をご確認ください。

参考③

列挙体そのものについては、以下の記事をご確認ください。