みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Excel2007に関する質問です。

列内の赤い文字(※セルは塗りつぶされていません)がついているセルの個数を数えたいのですが、その文字の色は条件付き書式(ルールを組んでいます)で色をつけています。

通常、セルの書式設定から色を変えた場合には、それらのセルの個数を数えるマクロは、過去の質問では以下のようになるそうです。

Function COUNTCOLOR(data As Range, color As Integer)
Application.Volatile
Count = 0
For Each c In data
If c.Font.ColorIndex = color Then
Count = Count + 1
End If
Next c
COUNTCOLOR = Count
End Function

それで使うときは
=COUNTCOLOR(A:A,3)

この場合だと赤文字のセルを数えることができるそうです。

ですが、ルールによって文字の色が変わっているセルをカウントできません。あくまでルールであり、書式上は通常の黒色になっています。どうしたら、ルールで色を付けたセルの個数を数えるマクロを組めるのでしょうか??

よろしくお願いします!!

投稿日時 - 2010-04-13 22:48:00

QNo.5824293

すぐに回答ほしいです

質問者が選んだベストアンサー

ルールによって色が変わってるセル
と考えずに
条件付き書式に設定された条件に一致するセルを拾い出せばいいのではないですか?

投稿日時 - 2010-04-13 23:18:21

お礼

遅くなりましたが、ありがとうございます。

投稿日時 - 2010-07-04 00:31:57

ANo.1

このQ&Aは役に立ちましたか?

2人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問