[[20181001110828]]　『太文字のセルのみ自動で色づけ』（なな）　ページの最後に飛ぶ

『太文字のセルのみ自動で色づけ』（なな）

太文字のセルのみ自動で色づけできる機能ありますか。。。？

＜使用 Excel：Excel2007、使用 OS：Windows7 ＞

 組み込みの機能でやるなら、書式で太字を検索して該当セルを全部選択し
 色を付けるとかですかね。

（コナミ） 2018/10/01(月) 11:35

 組み込み機能ならば置換で検索する文字列の書式で太字、置換後の文字列の書式で塗り潰し指定でも。
 （文字列入力欄はどちらも入力無しで）
（ねむねむ） 2018/10/01(月) 11:44

 あ、そうか。検索したんだったら置換までしちゃえばいいんですよね。
（コナミ） 2018/10/01(月) 12:31

コナミさん、ねむねむさん

ありがとうございます！
そして、質問の内容が分かりづらくてすいません。。。

例えば、A列に太文字の文字列が張り付けられた場合(別シートからデータを持ってきます)、
太文字の列だけ自動で色付けをしたいと考えてます。
こちらは可能でしょうか？

（なな） 2018/10/01(月) 16:22

 いえ、言いたいことはわかってます。
 一般機能で書式をキーにして自動で何か変更を加えることはできませんから
 検索・置換の案を出しました。

 お書きの内容だとマクロになるかと思います。
（コナミ） 2018/10/01(月) 17:06

コナミさん

ありがとうございます！
太字で検索して、そのセルのみ色づけすることはできましたが、
行そのものを変更することができません。。。

こちらアドバイスお願いできますでしょうか＞＜？
（なな） 2018/10/01(月) 18:47

 >太文字の列だけ自動で色付けをしたい
 >行そのものを変更する

 途中から出てきた要望だったので見落としておりました。
 が、列と行のどちらなんでしょうか？

（コナミ） 2018/10/01(月) 19:11

行です！！！

また、自動で行うためにマクロで設定してみたんですが、
FontクラスのBoldプロパティは設定できません。とエラーが出てしまいます・・・。
ご質問させていただいてる中で別のご質問となりもうしわけございません。
こちらおわかりになりますでしょうか？

Sub 書式設定()
'
' 書式設定 Macro
'

    Range("B103:W146").Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=COUNTIF($B103,""*CCLA*"")"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Font
        .Bold = True      ← こちらがエラーになってます。
        .Italic = False
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent5
        .TintAndShade = 0.799981688894314
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=COUNTIF($B103,""*KW*"")"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Font
        .Bold = True
        .Italic = False
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent5
        .TintAndShade = 0.799981688894314
    End With
    Selection.FormatConditions(1).StopIfTrue = False
End Sub

（なな） 2018/10/01(月) 19:27

なせ条件付き書式で太字にするマクロなのでしょうか。
太字のセルを検索するのではないのですか？

（マナ） 2018/10/01(月) 19:48

マナさん
ご連絡ありがとうございます。

太字を検索が目的ではなく
A列に太文字の文字列が張り付けた場合(別シートからデータを持ってきます)、
太字の列だけ自動で色付けをしたいと考えてます。
（なな） 2018/10/02(火) 09:53

＞太字の列だけ自動で色付けをしたいと考えてます。

それで、なぜ条件付き書式のマクロなのでしょうか。
太字のセルを検索し、見つかったらその行に色をつけるマクロではないのですか。

それとも、太字のセルには特定の文字が含まれているのでしょうか。
それならば、条件付き書式で色をつければよいだけですが？？？

（マナ） 2018/10/02(火) 23:15

コメント返信：

[ 一覧(最新更新順) ]

[[20181001110828]] 『太文字のセルのみ自動で色づけ』（なな） ページの最後に飛ぶ

[[20181001110828]]　『太文字のセルのみ自動で色づけ』（なな）　ページの最後に飛ぶ