VBA 文字列の一部の書式を設定する

文字列の一部の書式を設定する

構文

Range.Characters (Start:= start, Length:= length )

または

Range.Characters (start, length )

Sub test()

    ' 文字列の一部を青色に設定
    Range("A4").Characters(1, 4).Font.ColorIndex = 3
    Range("A5").Characters(1, 4).Font.ColorIndex = 3

End Sub

実行結果

startを省略すると、先頭文字から始まる文字列範囲を返します。Range("A5").Characters(, 4).Font.ColorIndex = 3と、書いても上と同じ結果となります。

文字数自動探して色をつける

Sub test2()

    ' 文字列の一部を青色に設定
    With Range("A3")
        .Characters(1, 4).Font.ColorIndex = 3
        .Characters(Len(.Value) - 3, 4).Font.ColorIndex = 3
    End With

End Sub

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじへ戻る