| |
こんばんは。よろしくお願いいたします。
編集→検索
表示されるウィンドウで検索タブを選択し、
検索する文字列に
「検索したい文字列」
と指定し、
「見つかった全ての項目を強調表示する」
にチェックを入れ、
「すべて検索」
を実行する作業をマクロの自動記録したものです。
Sub Macro1()
'
' Macro1 Macro
' 記録日 2010/06/02 記録者 hoge
'
Selection.Find.ClearFormatting
With Selection.Find
.Text = "検索したい文字列"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
.MatchFuzzy = True
End With
End Sub
このマクロの自動記録で生成したコードを実行しても何も
起こりません。
確かに「検索したい文字列」はドキュメント上に存在します。
マクロで行いたい作業は、
指定した文字列をドキュメント全体で検索し、ヒットした全箇所
をハイライト表示させる、ということです。
コードをどのように書き換えればいいでしょうか？
ご教示お願いいたします。
|
|
![[未読]](./data/word/image/read_icon.gif){kind=icon}
