エクセル2002の条件つき書式で・・・

質問

４以下は背景を赤
５は背景を緑
６は背景を青
７以上は背景を紫

にしたいです。

「条件付書式」で設定するのですが・・・。

４つは無理ですよね？
それってできますか？
できるならやり方を詳しく教えてください。

回答No.2

comv · ベストアンサー

再びこんばんは

>未入力時は透明にしたいです。
>ってことは条件が２つと未入力時透明の３パターンし>かダメということですか？
違います。　例にも書きましたが
条件が３つと未入力時１パターン　計４パターンまでは可能ってことです

>文字色で攻めてみることにします。
であれば　例えば
範囲選択　書式設定　表示形式タブ　分類：ユーザー定義
で種類欄に　[赤][<=4]0;[緑][=5]0;[青]0
と設定後
条件付き書式で
条件(1)　セルの値が▼　次の値以上▼　7　書式ボタン　フォントタブ　色：紫　を選択

・・・まだ２つ条件が追加可能ですね
（実際は表示形式の条件に文字列の場合を省いているので、文字の時は○色の条件も設定でき　計７パターンになります）

回答No.4

imogasi

VBAのコードをご参考に。
ボタンを１つ貼りつけて、そのクリックイベントに
下記をコピーし貼りつけて作ります。
Private Sub CommandButton1_Click()
Dim cl As Range
For Each cl In Selection
Select Case cl.Value
Case Is > 70
cl.Font.ColorIndex = 9
Case Is > 60
cl.Font.Color = vbGreen
Case Is > 50
cl.Font.ColorIndex = 13
Case Is > 40
cl.Font.Color = vbBlack
Case Is > 30
cl.Font.Color = vbCyan
Case Is > 20
cl.Font.Color = vbYellow
Case Is > 10
cl.Font.Color = vbBlue
Case Is > 0
cl.Font.Color = vbRed
End Select
Next
End Sub
範囲指定してボタンをクリックすると値の範囲（１－１０，１１－２０、・・・で）によって文字に色がつきます。

回答No.3

Silent-G

VBAを使うのですが、
ユーザー定義関数をうまく使えば
無限に設定することが可能です。

詳細は、時間がないので省きます。

次に見るときに解決していなければ
コードを書きます。

補足

勉強勉強！！

VBAの式を書いてみていただけますか？

がんばってやってみようと思います。

回答No.1

comv

こんばんは

条件付き書式は　デフォルトも含めると書式パターンは４種類です。

最初からセル範囲を　赤に塗りつぶし
条件(1)　セルの値が▼　次の値に等しい▼　5　書式ボタンで設定
条件(2)　セルの値が▼　次の値に等しい▼　6　書式ボタンで設定
条件(3)　セルの値が▼　次の値以上▼　　　7　書式ボタンで設定

未入力時（値がない時）に塗りつぶしなし　だと５パターンになるのでVBAを使わないと無理です。
（文字色なら、条件付き書式に加えて表示形式を工夫することで７パターンまで可能です！）

補足

言い忘れました！！

未入力時は透明にしたいです。
ってことは条件が２つと未入力時透明の３パターンしかダメということですか？

そのcomvさんのおっしゃる「表示形式を工夫する」を
詳しく教えてください！！
文字色で攻めてみることにします。