Wordで作成した目次の番号部分だけを、他のテキストと異なる書式に変更したいと思ったことはありませんか？たとえば、目次の番号を太字にしたり、色を変えたりすることで、文書全体の見栄えを良くすることができます。今回は、初心者の方でもわかりやすいように、Word VBAを使って目次の番号部分の書式を変更する方法をご紹介します。
目次の番号部分だけを変更する理由とは？
Wordのイメージ
目次は文書の構成を示す大切な部分ですが、番号部分が他のテキストと同じ書式だと、視認性が低くなりがちです。特に、長い文書では目次が重要なナビゲーションツールとなります。目次の番号を目立たせることで、読者が目的の章や節に素早くアクセスできるようになります。
VBAを使って目次の番号部分の書式を変更する手順
VBAエディタを開く
まず、Wordを開き、Alt + F11キーを押してVBAエディタを開きます。新しいモジュールを挿入するには、「挿入」メニューから「標準モジュール」を選択します。
コードを入力する
以下のコードを新しいモジュールに貼り付けてください。
vba
Sub 目次番号の書式変更()
Dim toc As TableOfContents
Dim tocEntry As Range
Dim tocPara As Paragraph
Dim i As Integer
' 目次を取得
Set toc = ActiveDocument.TablesOfContents(1)
' 目次の各項目をループ
For i = 1 To toc.Range.Paragraphs.Count
Set tocPara = toc.Range.Paragraphs(i)
Set tocEntry = tocPara.Range
' 番号部分を太字にする
tocEntry.Font.Bold = True
' 番号部分の色を変更する（例赤色）
tocEntry.Font.Color = RGB(255, 0, 0)
Next i
End Sub
このコードは、文書内の最初の目次（TablesOfContents(1)）を取得し、その各項目の番号部分の書式を変更します。番号部分を太字にし、色を赤に設定しています。
マクロを実行する
コードを入力したら、F5キーを押してマクロを実行します。これで、目次の番号部分の書式が変更されるはずです。
注意点とアドバイス
- バックアップを取るマクロを実行する前に、必ず文書のバックアップを取ってください。予期しない結果になる可能性があるためです。
- 目次の更新目次を手動で更新する場合、書式が元に戻ることがあります。書式を保持したまま目次を更新する方法についても学んでおくと便利です。
- 他の書式設定番号部分のフォントサイズやスタイル（斜体、下線など）を変更することも可能です。必要に応じてコードを調整してください。
よくある質問や疑問
Q1: 目次の番号だけでなく、タイトル部分の書式も変更できますか？
はい、可能です。コードを少し変更することで、目次のタイトル部分の書式も変更できます。具体的には、番号部分だけでなく、タイトル部分の範囲を指定して書式を変更することができます。
Q2: 目次が複数ある場合、すべての目次の番号を書式変更できますか？
はい、できます。コードを変更して、すべての目次（TablesOfContents(1), TablesOfContents(2), …）を対象にすることができます。ループを使用して、各目次の番号部分の書式を変更してください。
Q3: VBAのコードを実行する際にエラーが発生しました。どうすればよいですか？
エラーが発生した場合、エラーメッセージを確認し、コードの該当部分を見直してください。特に、目次が存在しない場合や、目次の構造が異なる場合にエラーが発生することがあります。コードを適切に修正することで解決できます。
まとめ
Word VBAを使って、目次の番号部分だけの書式を変更する方法をご紹介しました。これにより、文書の目次が視覚的に強調され、読者にとって使いやすいものとなります。初心者の方でも、上記の手順を参考にして、ぜひ試してみてください。
他にも疑問やお悩み事があればお気軽にLINEからお声掛けください。
コメント