[[20031208193350]] 『数値条件でセルの色を変える』(超初心者) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『数値条件でセルの色を変える』(超初心者)

数値を入力したセルまたは数値が、数値範囲別で色を分ける方法を教えてください。


 条件付書式の設定で出来ます。もう少し詳しくどのようにしたいのかを書いて頂かないと
これ以上、説明も出来ませんが、こちらを参考にして下さい。(ケン)
(e1qw)条件付き書式
http://www.excel.studio-kazu.jp/lib/e1qw/e1qw.html


ありがとうございました。
お願いする文章がまずくて申し訳ありませんでした。
知りたかったのは、もっと単純な内容で、セルに数値を入力し、そのセルの中の数値は、そのまま残って、ゼロならセルの色は無色、0<>10なら黄色、10≦>20なら緑色、20≦>30なら青色、30≦なら赤色というようなことです。また、セルの色による区分ではなく、入力した数値の数字の色で区分する方法も教えていただけたら嬉しいのですが。


 セルの塗つぶしだと、一般機能では無理っぽいので、フォントの色の設定で説明します。
書式>条件付書式で
・条件1・・・セルの値が > 次の値より大きい > 29 で書式(F)のボタンを押しフォントの
タブでフォントの色を赤に選択
・条件2・・・セルの値が > 次の値より大きい > 19 でフォントの色を青に選択
・条件3・・・セルの値が > 次の値より大きい > 9 でフォントの色を緑に選択
・セルの書式設定で表示形式のタブで「分類」をユーザー定義で種類を[黄]0;-0;0
とすればフォントの色ならお望み通りになります。(ケン)


 衝突しました。ケンさんの条件付き書式設定の方法が簡単で分かり易いですね!
 数値を入力する範囲選択します。仮にA1:B50とします。
@フォント色を赤に設定します。
Aツールメニューのオプション・表示で□ゼロ値のチェックを外します。
B書式メニューの「条件付き書式設定」で
条件1 [数式が][=AND(A1>0,A1<10)] [書式]フォント色 黄
条件2 [数式が][=AND(A1>=10,A1<20)] [書式]フォント色 緑
条件3 [数式が][=AND(A1>=20,A1<30)] [書式]フォント色 青
とすれば、入力した数値の数字の色で区分することが出来ます。
但し、条件式のセルは範囲選択した先頭セルを指定します。
【注意】条件1のフォント色(黄)は不適当です。他の色に変更するか、セルの塗りつぶしを薄灰色にします。
 (シニア)


 師匠フォロー有難う御座います。
ただ、自分の方法は(超初心者)さんの>ゼロならセルの色は無色
にはあてはまっていません。無色=黒と勝手に判断しました。
(超初心者)さんのご希望通りはシニアさんの方法が良いですね。(^^;
(超初心者)さん、その内きっとya..、ka..、In..、ram...、toori..この辺りのスペシャリストが
セルの塗つぶしを実現させるVBAを考えてくれますよ。たぶん・・・(ケン)


 皆さん、忙しいようで・・・
シートの見出しを右クリック>コード表示で
 Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Target.Address = Range("A1").Address Then Exit Sub
    If Target.Value < 1 Then
        Target.Interior.ColorIndex = xlNone
    ElseIf Target.Value < 10 Then
        Target.Interior.ColorIndex = 6
    ElseIf Target.Value < 20 Then
        Target.Interior.ColorIndex = 10
    ElseIf Target.Value < 30 Then
        Target.Interior.ColorIndex = 5
    Else
        Target.Interior.ColorIndex = 3
    End If
 End Sub
 このコードをコピペしてください。A1に塗つぶしが設定されます。(ケン)だれも遊んでくれん(+_+)


 ごめん、責任感じとるわ。
 仕事が忙しいさかい、2,3日後にまた遊ぼうな。それまで一人で賢う遊んどってや。
   もう寝るべ(弥太郎)

 は〜い(ケン)


色々の方法を教えていもらいありがとうございました。これで、数値を入力してから色を着ける作業をせずにすみそうです。(超初心者)


 今までの[(e1qw)条件付書式]が全然うまくゆかない、全然わからんと甥っ子に
 言われて、急遽新しく作りなおしました。少しはわかりやすくなったかも。

(e2qw)[新]条件付き書式

http://www.excel.studio-kazu.jp/lib/e2qw/e2qw.html

 (kazu)


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.