条件付き書式をマクロで記入する方法？

質問

よろしくお願いいたします。

エクセル２０１０を使用しておりますが、

１行目の列ごと（A列、B列・・・・）に各種類の品物が入力されていて

2行目から、列ごとにその品物別の番号が多数あるのですが、

指定した番号が一致したらセルの文字を”太字”で”赤文字”、”黄色”で塗りつぶすと

いった事がしたいのです。

条件付き書式でやればと思ったのですが、新しいルールといった作業が

かなり時間がかかります。

そこで作成してもらいたい事は

マクロで

A列の番号

B列の番号

C列の番号

条件は太字、赤文字、黄色に塗りつぶす

というような記述で列ごとに番号だけ変えれば上記のルールを実行できるといった

ことをしたいのですが、可能でしょうか？

できればマクロはほとんどわからないので、そのまま記述してもらえると助かります。

よろしくお願いいたします。

回答No.1

KURUMITO · ベストアンサー

マクロを組むよりも条件付き書式の設定で対応するのが最も対応しやすい方法です。

例えばA,B,Cの中に検索したい文字や数値がF1セルに入力されているとします。
初めにA,B,C列を選択します。A１セルがアクティブ状態のセルになっていますね。
そこで「ホーム」タブの「条件付き書式」の「新しルール」から「数式を使用して書式設定するセルを決定」を選択し、数式の窓には次の式を入力します。

=A1=$F$1

同じ画面の「書式」をクリックして「フォント」のタブで「スタイル」から「太字」を選択します。また、「塗りつぶしのタブ」で背景色に「黄色」を選択してOKします。

以上の操作をして条件付き書式を設定することでF１セルに入力したデータに該当するセルの表示が変わります。

また、仮にF１セルからF５セルまでの間に検索したい文字や数値を入力して、その該当するセルの表示を変えるのでしたら条件付き書式での数式は次のようにします。

=COUNTIF($F$1:$F$5,A1)>0

お礼

「数式を使用して書式設定するセルを決定」を選択し、数式の窓には次の式を入力します。

を選択していませんでした。

上記の方法で解決しました。

ありがとうございました。

補足

回答ありがとうございます。

説明不足ですみませんでした。

一つの数値を指定するのではなく

列ごとに必ず複数の数値を指定します。

よろしくおねがいいたします。