Friday, March 25, 2005

Excel VBA 空白セルがあればその行全体に色をつける

空白セルがあればその行全体に色をつける

No. 20 空白セルがあればその行全体に色をつける

【問題】
 A1:F10に表があります、
 その行のどれかが空白であったら、その行全体に色をつけるにはどうしたら良いでしょうか?

【回答】
1.A1をクリックしてマウスをドラッグしてA1:F10を選択
→セルA1がアクティブでA1:F10を選択している状態
2.メニュー[書式]-[条件付き書式]
3.[数式が]にして、右のボックスに =OR($A1:$F1="") と入力
4.[書式]ボタンをクリック
5.[パターン]タブで[黄]をクリック
6.Enter
7.[OK]ボタンをクリック

【解説】
 サンプルファイルはこちらです。
 条件付き書式は、Excel97 から追加された機能です。

 上記3.で =OR(ISBLANK($A1:$F1)) でも結構です。

No comments: