ネイサンは、一連の定型句を編集するときに、[オートコレクト]ダイアログボックスの[定型句]タブを継続的に表示するのは面倒だと感じています。彼は、エントリを大規模に編集できるファイルや別の方法があるのではないかと考えています。

定型句はテンプレートに保存され、ほとんどの場合、通常のテンプレートに保存されます。直接ロードして編集できる特別なファイルはありません。代わりに、Wordが目的のために提供しているツールを使用する必要があります。

多数の定型句を削除するだけの場合、タスクを簡単にするツールの1つはオーガナイザーです。次の手順に従ってください:

。 [ツール]メニューから[テンプレートとアドイン]を選択します。 Wordは、[テンプレートとアドイン]ダイアログボックスを表示します。 (図1を参照)

。 [オーガナイザー]ボタンをクリックします。 Wordはオーガナイザーツールを表示します。

。 [定型句]タブが表示されていることを確認します。オーガナイザーの右側には、Normal.dotファイルの情報が含まれている必要があることに注意してください。含まれている場合は、手順7に進みます。そうでない場合、または定型句がNormal.dotとは異なるテンプレートにある場合は、次の手順に進みます。 (図2を参照)

。オーガナイザーの右側にある[ファイルを閉じる]ボタンをクリックします。

これにより、テンプレートの情報が閉じられます。

。 [ファイルを開く]をクリックします。 Wordは、標準の[開く]ダイアログボックスを表示します。

。ダイアログボックスのコントロールを使用して、定型句エントリを含むテンプレートに移動して開きます。

。オーガナイザーの右側にある定型句のリストで、削除する最初のエントリをクリックします。

。 Ctrlキーを押しながら、削除する他の定型句をクリックします。

。削除するエントリをすべて選択したら、[削除]ボタンをクリックします。

。エントリを削除してもよいかどうか尋ねられる場合があります。はいと答えます。

。オーガナイザーを閉じます。

多くの定型句を削除する別の方法は、マクロを使用することです。次のマクロは、各定型句エントリをステップ実行し、それを削除するかどうかを決定する簡単な方法を提供します。

Sub DeleteAutoTextEntries()

Dim I As AutoTextEntry     Dim vAnswer As Variant

For Each I In NormalTemplate.AutoTextEntries         vAnswer = MsgBox("Delete AutoText Entry" & vbCr _           & "Name: " & I.Name & vbCr _           & "Value: " & I.Value, vbYesNoCancel, _           "Delete AutoText Entries")

Select Case vAnswer             Case vbYes                 I.Delete             Case vbCancel                 Exit Sub         End Select     Next I End Sub

マクロは、定型句がNormal.dotテンプレートにあることを前提としています。それらが別のテンプレートにある場合は、別のテンプレートが使用されるようにNormalTemplate参照を変更できます。マクロはダイアログボックスに各定型句を表示し、削除するかどうかを選択できます。 [キャンセル]ボタンをクリックする(またはEscキーを押す)こともでき、マクロはすぐに終了します。

注:

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

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

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