読者に特別な意味を伝えるためにテキストの色を使用するドキュメントを開発していると想像してください。たとえば、赤いテキストを使用して、ユーザーが入力する必要がある内容を示すことができます。テキスト内で色を使用するドキュメントを開発している場合、メニューを何度も使用してテキストの色を変更するのは非常に面倒な場合があります。このような場合、色を自動的に変更するマクロがあると便利です。マクロをキーの組み合わせまたはツールバーボタンに割り当てることができるため、メニューを使用する必要はありません。次のマクロは、現在選択されているテキストの色を赤に変更します。

Sub MakeRed()

If Selection.Type = wdSelectionNormal Or _       Selection.Type = wdSelectionBlock Then         Selection.Font.ColorIndex = wdRed     Else         Beep     End If End Sub

赤以外の色を使用したい場合は、マクロで行った色の割り当てを変更してください。 (定数wdRedを目的の色に変更するだけです。)VBAを使用すると、定数を使用して色を表すことができます。

利用可能な17の異なる色番号があります:

Number

Text Color

Word Constant

0

Auto

wdAuto

1

Black

wdBlack

2

Blue

wdBlue

3

Cyan

wdTurquoise

4

Green

wdBrightGreen

5

Magenta

wdPink

6

Red

wdRed

7

Yellow

wdYellow

8

White

wdWhite

9

Dark Blue

wdDarkBlue

10

Dark Cyan

wdTeal

11

Dark Green

wdGreen

12

Dark Magenta

wdViolet

13

Dark Red

wdDarkRed

14

Dark Yellow

wdDarkYellow

15

Dark Gray

wdGray50

16

Light Gray

wdGray25

注:

このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(253)は、Microsoft Word 97、2000、2002、および2003に適用されます。