Word VBAでフォントの設定を変更する方法【初心者向け解説】

Wordで文書を作成していると、フォントの変更を自動化したい場面が出てきますよね。特に、同じフォントを何度も手動で設定するのは面倒です。そこで登場するのが「Word VBA（Visual Basic for Applications）」です。VBAを使うと、フォントの設定を簡単に変更でき、作業効率が大幅にアップします。

今回は、初心者の方でもわかりやすいように、VBAを使ってWordのフォントを変更する方法を解説します。45歳以上の方でも安心して学べる内容ですので、ぜひ最後までご覧ください。

VBAとは？
VBAでフォントを変更する基本のコード
特定の範囲だけフォントを変更する方法
フォントを変更する際の注意点
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

VBAとは？

Wordのイメージ

まず、VBAとは何かをご説明します。VBAは、Microsoft Office製品（WordやExcelなど）に組み込まれているプログラミング言語です。これを使うことで、普段の操作を自動化したり、複雑な処理を簡単に実行したりできます。

例えば、毎回同じフォントに変更する作業をVBAで自動化すれば、ボタン一つでその作業を実行できるようになります。

VBAでフォントを変更する基本のコード

それでは、実際にVBAを使ってフォントを変更する方法を見ていきましょう。以下のコードをVBAエディタに入力することで、文書全体のフォントを変更できます。

Sub フォントを変更する()

    With ActiveDocument.Content.Font

        .Name = "MS ゴシック"  ' フォント名を指定

        .Size = 12             ' フォントサイズを指定

        .Bold = True           ' 太字にする

        .Italic = False        ' 斜体にしない

    End With

End Sub

このコードでは、文書全体のフォントを「MS ゴシック」に設定し、サイズを12ポイント、太字にしています。必要に応じて、フォント名やサイズを変更してください。

特定の範囲だけフォントを変更する方法

文書全体ではなく、特定の部分だけフォントを変更したい場合もありますよね。そんな時は、以下のようにコードを書きます。

Sub 範囲を指定してフォントを変更する()

    Dim rng As Range

    Set rng = ActiveDocument.Range(Start:=100, End:=200)  ' 100文字目から200文字目までを指定

    With rng.Font

        .Name = "Arial"      ' フォント名を指定

        .Size = 14          ' フォントサイズを指定

        .Bold = False       ' 太字にしない

        .Italic = True      ' 斜体にする

    End With

End Sub

このコードでは、文書の100文字目から200文字目までの範囲のフォントを「Arial」に設定し、サイズを14ポイント、斜体にしています。範囲の指定は、文字数や位置を基準に変更できます。