初心者でもできる！Word VBAで文字を操作する方法

Wordで文書を作成していると、「この部分だけ太字にしたい」「特定の文字を色を変えたい」といったことがよくありますよね。そんなときに便利なのが、Word VBAの「Characters（キャラクターズ）」という機能です。今回は、初心者の方でもわかりやすく、実際に使える例を交えてご紹介します。

Charactersとは？
基本的な使い方
実際の活用例
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

Charactersとは？

Wordのイメージ

Word VBAの「Characters」とは、文書内の文字を一つ一つ操作できる機能です。例えば、文書の中から特定の文字を見つけて、その文字だけを太字にしたり、色を変えたりすることができます。

基本的な使い方

まずは、文書内の文字を操作する基本的な方法をご紹介します。

特定の文字を太字にする

例えば、文書の最初の5文字を太字にしたい場合、以下のようなコードを使います。

Sub 太字にする()

    ActiveDocument.Characters(1, 5).Font.Bold = True

End Sub

このコードでは、文書の1文字目から5文字目までを太字に設定しています。

特定の文字の色を変える

次に、文書の6文字目から10文字目までの色を赤に変更する方法です。

Sub 色を変える()

    ActiveDocument.Characters(6, 5).Font.Color = wdColorRed

End Sub

このコードでは、6文字目から10文字目までの文字色を赤に設定しています。

文書内のすべての文字を操作する

文書全体の文字を操作したい場合は、以下のように書きます。

Sub 全体を操作()

    Dim 文字 As Range

    For Each 文字 In ActiveDocument.Characters

        ' ここに操作したい内容を書く

    Next 文字

End Sub

このコードでは、文書内のすべての文字を一つずつ取り出して、操作することができます。

実際の活用例

例えば、文書内で「重要」という文字を見つけて、その文字を太字にしたい場合、以下のようなコードを使います。

Sub 重要を太字にする()

    Dim 文字 As Range

    For Each 文字 In ActiveDocument.Characters

        If 文字.Text = "重" Then

            文字.Font.Bold = True

        End If

    Next 文字

End Sub

このコードでは、文書内のすべての文字を一つずつ確認し、「重」という文字があれば、それを太字に設定しています。

よくある質問や疑問

Q1: CharactersとRangeの違いは何ですか？

「Characters」は文書内の文字を一つずつ操作するためのもので、「Range」は文書内の任意の範囲を指定して操作するためのものです。例えば、文書の1行目を操作したい場合は「Range」を使います。

Q2: 特定の文字を検索して、その前後の文字も一緒に操作することはできますか？

はい、できます。例えば、「重要」という文字の前後の文字も一緒に太字にしたい場合、以下のようなコードを使います。

Sub 重要前後を太字にする()

    Dim 文字 As Range

    For Each 文字 In ActiveDocument.Characters

        If 文字.Text = "重" Then

            ' 前の文字を太字にする

            If 文字.Start > 1 Then

                ActiveDocument.Characters(文字.Start - 1, 1).Font.Bold = True

            End If

            ' 現在の文字を太字にする

            文字.Font.Bold = True

            ' 次の文字を太字にする

            If 文字.Start + 1 <= ActiveDocument.Characters.Count Then
                ActiveDocument.Characters(文字.Start + 1, 1).Font.Bold = True
            End If
        End If
    Next 文字
End Sub

このコードでは、「重」という文字の前後の文字も含めて太字に設定しています。