エクセルで、作成済みの表の中の特定の文字に色をつけたい

質問

検索と置換のオプション機能で、特定の字に色をつけようと思ったら、ここはあくまでも文字と文字の置換でした。（ワードはこれでｏｋです）作成済みの表の中の特定の文字を検索して色文字にしたいのです。簡単にできる方法を教えてください。

回答No.4

imogasi

＃３です。ＶＢＡで
Sub test02()
Dim c As Range
For Each c In Selection
s = 1
Do
x = InStr(s, c, "a")
If x = 0 Then GoTo p02
c.Characters(x, 1).Font.ColorIndex = 3
MsgBox x
s = x + 1
Loop While Not x = 0
p02:
Next
End Sub
で出来ると思います。
ツール－マクローＶＢＥででる画面において、
メニューの挿入－標準モジュールでコード画面が出ます。
そこに上記をコピーして貼りつけます。
(例データ）
abc
dfg
gqw
rty
wass
sdaaga
（操作）
Ａ１Ａ６を範囲指定して（これが必要！）、上記を実行する（Ｆ５キーを押す）と、Ａ１のa,A5のa,A6の３つのaが赤色文字になりました。

回答No.3

imogasi

文字１文字を色づけるのはＶＢＡでないとむつかしいと思う。そのセルに指定の文字（文字列でも良い）が含まれていたら、セルに色を付けるなら次の方法で出来る。
書式を設定するセル範囲を指定する。
書式－条件付き書式－式が－式に=NOT(ISERROR(FIND("a",A1)))をいれる。
書式にセル色（パターン）かフォントを指定してＯＫ
（例データ）Ａ１：Ａ４で
abc
dfg
gqw
rty
was
Ａ１とＡ４にaがあるので色がつく。

回答No.2

matrix4

表の中の文字ならそれ以外を他の文書に写し
その後検索をかければ、文字変換できるかも

回答No.1

mshr1962

セル単位（セル内の文字全部）なら条件付き書式で出来ますが、
一部分の場合は手で変更するしかありません。

一致の場合（セルの値が"あああ"の場合）
「書式」「条件付き書式」で
「セルの値が」「次の値に等しい」「"あああ"」
で書式の文字色またはパターンを変更する。

含む場合（A1の値に"あああ"が含まれる場合）
「書式」「条件付き書式」で
「数式が」「=NOT(ISERROR(FIND("あああ",A1)))」
で書式の文字色またはパターンを変更する。