検索を選択することはできませんが( link:/ word-Selective_Formatting_in_Searches [前のヒント])、実際に情報を置き換える場合、Wordの方がはるかに柔軟です。たとえば、文字X45のインスタンスが多数あるドキュメントがあるとします。これらの文字を見つけて、通常のXと上付き文字の45に置き換えたい場合は、いくつかの方法があります。

最初の方法は、2段階の検索と置換を含みます。次の一般的な手順に従うことができます:

。 X45文字列を検索し、すべての出現箇所をX $$%$%に置き換えます。ここでの考え方は、$%$%はドキュメントの他の場所では使用されない文字列であるということです。

。 $%$%のすべての出現箇所を検索し、上付きの45に置き換えます。

これらの2つの手順を実行するのにそれほど時間はかかりません。複数のドキュメントで実行する必要がある場合は、それらを実行する小さなマクロを記録することでプロセスを自動化できます。

この問題に取り組むもう1つの方法は、実際の検索を実行し、ドキュメントの1回のパスで置き換える小さなマクロを作成することです。マクロは、X45のすべてのオカレンスを検索し、45の部分のみを選択して上付き文字にし、次のオカレンスに進むことができます。次のマクロはまさにそれを行います:

Sub DoX45()

Dim oRng As Range     With Selection         .HomeKey unit:=wdStory         With .Find             .ClearFormatting             .Forward = True             .text = "X45"

.Execute             While .Found                 Set oRng = ActiveDocument.Range _                 (Start:=Selection.Range.Start + 1, _                   End:=Selection.Range.End)

oRng.Font.Superscript = True                 oRng.Start = oRng.End                 .Execute             Wend         End With     End With End Sub

最後に、マクロを特に気にしない場合は、さらに簡単な解決策があります:

。 X45の最初のインスタンスを希望どおりにフォーマットします。

。インスタンスを選択し、Ctrl + Cを押します。フォーマットされたバージョンがクリップボードにあります。

。 Ctrl + Hを押して、[検索と置換]ダイアログボックスの[置換]タブを表示します。 (図1を参照)

。 [検索する文字列]ボックスに「X45」と入力します。

。 [置換]ボックスに「^ c」と入力します。

。 [すべて置換]をクリックします。

これらの手順に従うことにより、WordはX45のすべてのインスタンスをクリップボードの内容に置き換えます。クリップボードの内容はたまたま使用したいフォーマットされたバージョンです。つまり、テキストは1回の検索と置換操作でフォーマットされます。

注:

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

link:/ wordribbon-WordTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]

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

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