[[20060719190601]] 『セルの色が赤の数値を計算する方法』(若葉マーク) ページの最後に飛ぶ

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

 

『セルの色が赤の数値を計算する方法』(若葉マーク)

 赤色のセルに入っている数値だけを計算する方法を教えて下さい。


 「ダウンロード」にある、Color関数を使用する方法や、
http://www.excel.studio-kazu.jp/DL/#q10
 全文検索で、「GET.CELL(63」と入力して検索すると、いいかもしれませんね^^
http://www.excel.studio-kazu.jp/cgi-bin/estindex/estseek2.cgi?phrase=GET.CELL%2863&perpage=10&attr=&order=&clip=-1
 
 (キリキ)(〃⌒o⌒)b

キリキさん、ありがとうございました。
GET.CELL(63をまずは練習で、出てた通りにためしてみました。
A1からZ1に適当に黄色を5個つけてみました。
でA2→名前の定義の参照範囲に GET.CELL(63,A1)+NOW()*0
と入れましたが、0しか出てきません。
どうしてでしょうか。。。。。

 条件付書式で色づけしていないという条件付関数はどうでっか?
 標準モジュールに下のコードを貼り付けて
     =wakaba(a1:c100)といった塩梅に書き込みます。
 えと、カラーは再計算させなあきまへんのんで、その範囲に色づけしたらF9で再計算
 して下さい。
       (弥太郎)
 '-----------------
 Function wakaba(adrs As Range)
    Dim c As Range
    Dim totl As Double
    Application.Volatile

    For Each c In adrs
        If c.Interior.ColorIndex = 3 And IsNumeric(c.Value) Then
            totl = totl + c.Value
        End If
    Next c
    wakaba = totl

 End Function


 >GET.CELL(63をまずは練習で、出てた通りにためしてみました。
 >A1からZ1に適当に黄色を5個つけてみました。
 >でA2→名前の定義の参照範囲に GET.CELL(63,A1)+NOW()*0
 
1)まず、A2 にカーソルを置いている状態で
2)挿入 → 名前 → 定義
3)名前 : iro (名前は分かりやすいものでしたらなんでもOK)
  参照範囲 : =GET.CELL(63,A1)+NOW()*0
        ※「=」も忘れずに!
4)A2 =iro
  B2〜Z2 までコピペ
 
 以上で、1行目に「黄色」にしたセルの下(2行目)に「6」がでませんか?
 もちろん、色をつけていないところは「0」がでます。
 
 (キリキ)(〃⌒o⌒)b

コメント返信:

[ 一覧(最新更新順) ]


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