当サイトの記事にはプロモーションが含まれています。

初心者向け:VBAでWordのフォント色をColorIndexで設定する方法

パソコンパソコン・スマホ教室
スポンサーリンク

皆さん、こんにちは。今日は、WordのVBAを使ってフォントの色を変更する方法についてお話しします。特に、ColorIndexというプロパティを使って色を指定する方法を、初心者の方にもわかりやすく解説します。この方法をマスターすれば、文書内の特定の部分を強調したり、見栄えを良くしたりするのに役立ちますよ。

スポンサーリンク

ColorIndexとは何か?

Wordのイメージ

Wordのイメージ

まず、ColorIndexとは何かを理解しましょう。これは、WordやExcelのVBAで使用されるプロパティで、特定の色を数値で指定するためのものです。例えば、赤色を指定したい場合は、ColorIndexに「3」を設定します。このように、色ごとに対応する番号が割り当てられており、それを使って色を指定します。

ColorIndexを使ってフォントの色を変更する方法

それでは、具体的にColorIndexを使ってフォントの色を変更する方法を見ていきましょう。以下の手順で進めていきます。

  1. まず、Wordを開きます。
  2. 次に、AltキーとF11キーを同時に押して、VBAの編集画面を開きます。
  3. 左側のプロジェクトエクスプローラーで、「ThisDocument」をダブルクリックします。
  4. 右側のコードウィンドウに、以下のコードを入力します。
vba
Sub フォント色を変更する()
Selection.Font.ColorIndex = wdRed
End Sub

このコードは、現在選択されているテキストのフォント色を赤色に変更するものです。「wdRed」は、赤色を示す定数で、ColorIndexプロパティに設定することでフォントの色を赤に変更します。

具体的な使用例特定の単語の色を変更する

では、もう少し実践的な例を見てみましょう。例えば、文書内の特定の単語をすべて赤色に変更したい場合、以下のようなコードを使用します。

vba
Sub 特定の単語を赤色にする()
Dim rng As Range
Set rng = ActiveDocument.Content
With rng.Find
.Text = "特定の単語"
.Replacement.Font.ColorIndex = wdRed
.Execute Replace:=wdReplaceAll
End With
End Sub

このコードは、文書全体から「特定の単語」を探し出し、そのフォント色を赤色に変更します。「wdRed」は赤色を示す定数で、ColorIndexプロパティに設定することでフォントの色を赤に変更します。

ColorIndexで使用できる色の一覧

ColorIndexで使用できる主な色とその番号は以下の通りです。

番号
0 自動(通常は黒)
1
2
3
4 明るい緑
5 ピンク
6
7 水色
8
9 暗い青
10 暗い赤
11 暗い緑
12 暗い黄
13 灰色25%
14 灰色50%

これらの番号をColorIndexプロパティに設定することで、対応する色を指定できます。

ColorIndexを使用する際の注意点

ColorIndexを使用する際には、以下の点に注意が必要です。

  • ColorIndexで指定できる色は限られており、細かい色指定が必要な場合は、RGB関数を使用する方法もあります。
  • 文書の互換モードによっては、ColorIndexが正しく機能しない場合があります。その場合は、文書を最新の形式に変換することを検討してください。

よくある質問や疑問

Q1: ColorIndexとColorプロパティの違いは何ですか?

A1: ColorIndexは、特定の色を数値で指定するプロパティで、使用できる色は限られています。一方、Colorプロパティは、RGB関数を使用して任意の色を指定することができます。

この記事を書いた人
この記事を書いた人

企業の情報システム部門で10年以上、PC・アカウント・社内ネットワーク・Microsoft 365/Google Workspace運用を担当。年間数百件の問い合わせ対応(PC不調、メール送受信、Excel/Word資料、Teams会議、スマホ連携など)を通じて、初心者がつまずくポイントを「再現→原因切り分け→最短解決」の手順に落とし込んできました

現場や身近で実際に起きたトラブルをベースに、手順だけでなく「なぜそうなるか」「失敗しやすい落とし穴」「安全な設定(セキュリティ)」まで含めて解説します。

相談窓口(問い合わせ/LINE等)を設け、記事で解決しないケースも個別にサポートしていますので「パソコンが急に動かなくなった」「スマホの設定がわからない」などの悩みは一人で抱え込まず、お気軽にご相談ください。

【お問い合わせは下記URLから】
https://m32006400n.xsrv.jp/inquiry-form/

【公式LINEは下記URLから】
https://lin.ee/t8TDjcj

uri uriをフォローする
スポンサーリンク
よかったらシェアしてね! /
uri uriをフォローする

コメント

タイトルとURLをコピーしました