No.1ベストアンサー
- 回答日時:
こんにちは。
こんな感じでどうですか?
対象シートのマクロとして以下を記述します。
「'セル背景色を黄色」の行をコメント解除する事で背景色も設定しています。
Sub setColor()
Dim AmaxRow, BmaxRow As Long
With ActiveSheet
AmaxRow = .Cells(.Rows.Count, "A").End(xlUp).row
BmaxRow = .Cells(.Rows.Count, "B").End(xlUp).row
Dim str As String
Dim ar, br As Long
For br = 9 To BmaxRow
Dim c As Range
Set c = .Range("A9:A" & AmaxRow).Find(.Cells(br, 2), LookIn:=xlValues)
If Not c Is Nothing Then
Dim fAddr As String
fAddr = c.Address
Do
'c.Interior.ColorIndex = 6 'セル背景色を黄色
Call setCharColor(c, .Cells(br, 2)) '部分一致文字の色付け
Set c = .Range("A9:A" & AmaxRow).FindNext(c)
Loop While Not c Is Nothing And c.Address <> fAddr
End If
Next
End With
End Sub
Sub setCharColor(ByRef rg As Range, ByVal str As String)
Dim st, length As Integer
st = InStr(rg.Value, str)
length = Len(str)
If st > 0 Then
rg.Characters(Start:=st, length:=length).Font.ColorIndex = 3 '文字列を赤色に!
End If
End Sub
No.2
- 回答日時:
完全一致なら、条件付き書式で出来ます。
下記サイトの「21.別シートにある文字列との重複チェック」を
参考にしてください。
http://www2.odn.ne.jp/excel/waza/cformat.html#SE …
また、部分一致は条件付き書式だけでは無理です。
数式と作業セルと組み合わせて行うか、
マクロでなら出来ると思います。
下記は過去の質問で、「セルの一部分だけを太字にする方法」で、
参考にしてください。
http://oshiete1.goo.ne.jp/qa2630694.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) EXCEL関数(数式)を教えてください 11 2023/05/09 13:19
- Visual Basic(VBA) VBA初心者です 検索した数字の行に色をつける 5 2023/02/13 14:22
- Excel(エクセル) 指定文字列が該当するA列をアクティブセルにするには 3 2022/08/17 13:18
- 化学 この中に、合成界面活性剤は含まれていますか? セスキイソステアリン酸ソルビタン【乳化剤】 シリカ【粉 1 2023/06/20 20:05
- Excel(エクセル) EXCEL関数(数式)を教えてください 2 2022/05/20 12:52
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
- Excel(エクセル) エクセルの条件付き書式で*を使いたい 4 2022/05/13 16:49
- Excel(エクセル) 【Excel】指定のセル内容を基に別シートのセルを検索して選択する【VBA】 1 2022/06/16 16:16
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/08 09:05
- Google+ はじめまして。Google検索で創意工夫夏休みと入力し、色々な作品を見ていたら、ハッカーしてる?され 1 2022/08/06 18:46
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
E列のセルに数値が入れば(空白...
-
Excel にて条件付き書式の色に...
-
条件付き書式で、結果が1行ずれる
-
条件付書式で「=#N/A」に色を付...
-
エクセルの枠の中の文字が青文...
-
エクセル 条件付き書式で色をつ...
-
Excelの条件付き書式にて空白セ...
-
エクセルで特定の数字等を表示...
-
Excelで2つのファイルを比較し...
-
Excelについて あるセルに文字...
-
エクセルでカーソルのある行を...
-
条件付き書式で太罫線を引く方法
-
セルの値が空白じゃないなら色...
-
エクセルで一定期間が経過した...
-
エクセル内で複数の文字(50個ぐ...
-
エクセル:文字色を認識して○×...
-
【Excel】条件付き書式で 0では...
-
セル結合させてるときの 条件...
-
別シートのセルの色も同じ色に...
-
条件付き書式を教えてください
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
E列のセルに数値が入れば(空白...
-
Excel にて条件付き書式の色に...
-
条件付書式で「=#N/A」に色を付...
-
条件付き書式で、結果が1行ずれる
-
エクセルの枠の中の文字が青文...
-
エクセルで特定の数字等を表示...
-
エクセル 条件付き書式で色をつ...
-
Excelの条件付き書式にて空白セ...
-
エクエルで隣のセルの文字が赤...
-
条件付き書式で太罫線を引く方法
-
エクセル内で複数の文字(50個ぐ...
-
セル結合させてるときの 条件...
-
Excelについて あるセルに文字...
-
Excelで2つのファイルを比較し...
-
エクセルで一定期間が経過した...
-
エクセルで1以上は全て1にするには
-
エクセルでカーソルのある行を...
-
セルの値が空白じゃないなら色...
-
【エクセル】今日の日付に赤枠...
-
エクセルで日付を入力したらカ...
おすすめ情報