エクセルマクロで、太字を含むセルに色付けするVBAコードをご紹介します。
このページのマクロコードは、コピペで使えます。
せひ、お試しください。
太字を含むセルに色付けする
以下のExcelVBAを実行すると、太字を含むセルを検索して色づけします。
Sub 太字を含むセルに色をつける()
Dim myrange As Range
Dim i As Long
'太文字の検索範囲
For Each myrange In Range("A1:E21")
For i = 1 To Len(myrange)
'セル内の文字を1つずつ取得し、太文字かチェック
If myrange.Characters(Start:=i, Length:=1).Font.Bold = True Then
'セルの背景色を塗りつぶす
myrange.Interior.Color = 65535
Exit For
End If
Next i
Next
End Sub
マクロ実行後
太文字を含むセルに自動で色を塗ります。
セル内の文字列を1文字ずつチェックして、太文字が含まれているか判定します。
セル内の文字列の一部が太字になっているセルの背景色も塗りつぶします。
この記事がお役に立ちますと幸いです。

【エクセルマクロ】太字のみ合計する:コピペで使えるコード
...