単語リストから単語を強調表示する(Microsoft Word)
Paulは、別のドキュメントに含まれている単語リストと照合する必要があるドキュメントを持っています。チェック対象のドキュメントにリスト内の単語の1つが含まれている場合、ドキュメント内の単語(単語リストにはない)
太字にすることで強調する必要があります。単語リストは2万語程度と大きく、ポールはこれを行う最善の方法は何かと考えています。
続行するには2つの方法があります。 1つ目は、比較を行う独自のマクロを作成することです。チェックしたい単語をC:ドライブの「checklist.doc」という名前のドキュメントに入れると、次のマクロを使用できます。
Sub CompareWordList() Dim sCheckDoc As String Dim docRef As Document Dim docCurrent As Document Dim wrdRef As Object sCheckDoc = "c:\checklist.doc" Set docCurrent = Selection.Document Set docRef = Documents.Open(sCheckDoc) docCurrent.Activate With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Replacement.Font.Bold = True .Replacement.Text = "^&" .Forward = True .Format = True .MatchWholeWord = True .MatchCase = True .MatchWildcards = False End With For Each wrdRef In docRef.Words If Asc(Left(wrdRef, 1)) > 32 Then With Selection.Find .Wrap = wdFindContinue .Text = wrdRef .Execute Replace:=wdReplaceAll End With End If Next wrdRef docRef.Close docCurrent.Activate End Sub
チェックするドキュメントを開いてから、マクロを実行するだけです。チェックする単語を含むドキュメントの名前が異なる場合、または場所が異なる場合は、sCheckDocを設定する行を変更して、ドキュメントのフルパス名が異なるようにします。
基本的に、マクロは単語リストから各単語を取得し、ドキュメント内のその単語を使用して検索と置換操作を実行します。単語リストに非常に多くの単語がある場合、マクロの実行にはかなりの時間がかかる可能性があります。20,000回の検索と置換操作はかなりの数です。
注:
このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(1173)は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice 365のWordに適用されます。このヒントのバージョンは、ここにWordの古いメニューインターフェイス:
link単語リストから単語を強調表示。