コメント内のテキストの変更（Microsoft Word）
リッキーは多くのコメントを含むドキュメントを持っています。彼はそれらのコメントで繰り返される1つの単語を変更したいと考えています。たとえば、「ジョーの注意を引く」というフレーズで、彼はそれを「メアリーの注意を引く」に変更したい場合があります。リッキーは、このタイプの検索と置換を実行してコメントのみに影響を与える方法があるかどうか疑問に思います。
実際、この種のタスクはWordで非常に簡単に実行でき、いくつかの方法でアプローチできます。これを行う1つの方法は次のとおりです。
。ドキュメントの最初のコメント内に挿入ポイントを配置します。
（これは重要なので、このステップをスキップしないでください。）
。 Ctrl + Hを押します。 Wordは、[検索と置換]ダイアログボックスの[置換]タブを表示します。
。必要に応じて、ダイアログボックスの設定を入力します。 （たとえば、[検索する文字列]ボックスに「Joe」というテキストを入力し、[置換]ボックスに「Mary」というテキストを入力します。）
。 [次を検索]をクリックします。 Wordは、コメント内で、探しているテキストの最初の出現箇所を見つけます。
。コメントで必要なすべての変更を行うまで、必要に応じて[置換]または[次を検索]をクリックします。
。 [検索と置換]ダイアログボックスを閉じます。
次の代替手順に従うと、最初の手順（最初のコメントに挿入ポイントを配置する必要がある）をバイパスできます。
。 Ctrl + Hを押します。 Wordは、[検索と置換]ダイアログボックスの[置換]タブを表示します。
。 [検索]タブをクリックして表示します。
。 [検索する文字列]ボックスに、「ジョー」など、検索するテキストを入力します。
。 [検索対象]ドロップダウンリストをクリックして、[コメント]を選択します。 （このドロップダウンリストは、[検索]タブではなく[置換]タブで作業している場合は使用できません。なぜですか？誰が知っていますか？）Wordはコメントで見つかったすべての一致を選択します。
。 [置換]タブをクリックして表示します。
。 [置換]ボックスに、置換として使用するテキスト（「メアリー」など）を入力します。
。 [すべて置換]ボタンをクリックします。 Wordは、手順3で指定したテキストのすべてのインスタンスを手順6で指定したテキストに置き換え、コメントでのみ置き換えます。
。 [検索と置換]ダイアログボックスを閉じます。
多くのドキュメントにこれらの変更を加える必要がある場合（おそらく、ジョーが会社を辞め、メアリーが新しいポイントパーソンになっている場合）、マクロを使用して変更を加えることに興味があるかもしれません。以下は、アクティブなドキュメントに対してトリックを実行します：
Sub MakeItMary() Dim c As Comment Dim sFind As String Dim sReplace As String sFind = "Joe" sReplace = "Mary" For Each c In ActiveDocument.Comments c.Range.Text = Replace(c.Range.Text, sFind, sReplace) Next End Sub
注：
このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
link：/ wordribbon-WordTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（6200）は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice365のWordに適用されます。