ワードで、文章を入力し、フォントの色は黒で入力しました。

質問

ワードで、文章を入力し、フォントの色は黒で入力しました。

ところどころ、赤色のフォントを使用した個所があり、

その赤色のフォントだけを検索したり、抽出したりできないでしょうか。

バージョンは、2007です。

文章量が大量のため、ご相談させていただきました。

回答No.1

imogasi · ベストアンサー

検索はできます。少なくとも、２００２からは出来ます。
編集ー検索ーオプションー書式でフォントの色を＞その赤色のフォントで指定して、「検索する文字列」は空白にして検索すれば、文書上の該当の個所がわかります。
まあ赤色の文字を探すのとどちらが良いかという話ですが。

回答No.2

imogasi

#1です。
ワードVBAの経験が必要ですが
下記実行すると、該当の語句を、メモ帳で読めるような形式で書き出せます。
ただし編集ー検索のオプションをクリック
書式をクリック
フォント
フォントの色を指定
して手操作で次々検索していけることを確認した上で、実行すること。
検索の条件などは手動で設定するということ。下記は書き出しのみ。
２００７ではテストできてないが。
標準モジュールに
Sub test101()
Open "C:\Documents and Settings\XXXX\My Documents\検索結果.txt" For Output As #1
Selection.HomeKey Unit:=wdStory
p1:
Selection.Find.Execute
If Selection.Find.Found = True Then
'MsgBox Selection.Text
s = Selection.Text
MsgBox s
Print #1, s
Else
Close #1
Exit Sub
End If
GoTo p1
End Sub
メモ帳で、出来たファイル検索結果.txtを開き、印刷でもして利用しては。