質問: WORDの文章で文字検索ウインドウ枠内に入力した文字全てをツールバーで指定した色に変える作業を文末まで自動的に繰り返したいのですが、このとき FOR文をどういう式としたらよいですか? 特に文末でやめるには? また FOR の変数の種類は? 1回のみの色替えのマクロ記録は成功しておりますが、文末まで自動で行いたいのです。よろしくお願いします。
回答: VBEのヘルプから、Find.Foundプロパティのサンプルコードを使ってDo・・・Loopしてみました。 Sub test1() Selection.HomeKey Unit:=wdStory With Selection.Find .ClearFormatting Do .Execute findText:="あ", Format:=True, Forward:=True If .Found = True Then Selection.Font.Color = wdColorRed Else Exit Do End If Loop End With End Sub