No.4ベストアンサー
- 回答日時:
直接の回答ではありませんが...
塗りつぶしを手作業で行っているようですが、何かしら塗りつぶす条件があるなら、
その条件データを使ってカウントできるのでは?
また、できるだけそのように表を作成することをお勧めします。
No.3
- 回答日時:
この問題は時どき質問がありますが、2003まではストレートにはできません。
エクセル2007では実現できるようです。エクセルは目的実現の手段として
(1)操作
(2)ウイザード・アドイン
(3)関数
(4)VBA
などで適当なものを使います。普通の方は(3)をイメージしているようですが、関数はセルの「値」しか採ったり、計算して、値としてセットしかできません。書式はとれず、セットもできません。
しかし
ーー
色づけの元ルールが、数量的な基準であれば(部長の総合的判断のようなタイプのものでなければ)その計量的な基準に戻ってそれで、関数で該当数を求められる場合があります。
(例 点数50-70の件数など)
ーー
(3)と(4)の橋渡しのような、ユーザー関数定義があるので
セルの色コードをVBで捉えてコードで返してもらうようにすれば
関数の対象になります(COUNTIFなど)
(4)VBAでやるなら、上記2つのどちらの方式もプログラムコード化可能です。
No.2
- 回答日時:
手動での作業となってしまいますが、以下の手順ではいかがでしょうか?
編集→検索→「オプション」ボタン→「書式」ボタン→「パターン」タブで
数えたい色を選択(「明るい緑」)→「OK」ボタン→「すべて検索」ボタン
検索ダイアログボックスの一番下に○セルが見つかりました。
と、該当するセルの個数が表示されます。
ちなみに「検索ダイアログボックス」はCtrlキーを押しながらFキーでも
呼び出せるので、このショートカットを使えば多少は楽になるかと思います。
No.1
- 回答日時:
ユーザ定義関数にします
以下のマクロをALT+F11でVBE画面を開き、左上のVBA Projectでシート名を右クリックし「挿入」→「標準モジュール」で表示される画面に貼り付けて下さい。
ワークシート画面に戻り
=cntCLR(カウントする範囲,数えたい色のセル)
という式を入力します(例 =cntCLR(B1:E10,A1) )
『明るい緑』を数えたいなら上の例ではA1の背景色を『明るい緑』にしておきます。数えたい範囲に文字があっても構いません。
>緑のセルがいくつ、青のセル
ならこの式を二つのセルに入力します。青と緑の合計は二つの結果を足せばよいでしょう
Function cntCLR(ByVal rng As Range, trg As Range)
Dim r As Range
For Each r In rng
If r.Interior.ColorIndex = trg.Interior.ColorIndex Then
cntCLR = cntCLR + 1
End If
Next r
End Function
ただしこのユーザ関数は式を入力した後でセルの背景色を変更しても自動では結果が更新されません。更新するにはAlt+Ctrl+F9で強制再計算してやる必要があります
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで教えて下さい。 2 2022/05/18 13:00
- Excel(エクセル) エクセルの関数について 5 2023/04/30 17:24
- Excel(エクセル) マクロ/VBAについて教えてください。 10 2022/05/27 12:59
- Excel(エクセル) エクセル関数の質問 5 2022/04/20 09:46
- Excel(エクセル) 指定した数字まで累計する方法や文字例の抽出について教えてください 4 2022/10/05 21:19
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) エクセルでの操作方法 1 2022/11/15 14:09
- Visual Basic(VBA) VBAについて教えてください。 Excelで セルのB6~BG24でダブルクリックすると ダブルクリ 1 2022/06/02 17:07
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/03/09 16:55
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelで数式内の文字色を一部だ...
-
【エクセル】IF関数 Aまたは...
-
対象セル内(複数)が埋まった...
-
エクセルで指定したセルのどれ...
-
Excelでのコメント表示位置
-
エクセル 足して割る
-
貼り付けで複数セルに貼り付けたい
-
Excelで教えてください。 バー...
-
枠に収まらない文字を非表示に...
-
セルをクリック⇒そのセルに入力...
-
エクセルの一つのセルに複数の...
-
【Excel】 セルの色での判断は...
-
excelのCOUNTIF関数で、『範囲=...
-
エクセル “13ヶ月”を“1年1ヶ月...
-
(Excel)数字記入セルの数値の後...
-
Excel2003 の『コメント』の編...
-
セルの高さ(行高)を求めるには?
-
エクセルでオブジェクトを常に...
-
EXCELのセルの中の半角カンマの...
-
VBAで特定の文字が入力されたセ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで指定したセルのどれ...
-
【エクセル】IF関数 Aまたは...
-
セルをクリック⇒そのセルに入力...
-
Excelで数式内の文字色を一部だ...
-
エクセル 足して割る
-
対象セル内(複数)が埋まった...
-
貼り付けで複数セルに貼り付けたい
-
Excelでのコメント表示位置
-
エクセルのセルの枠を超えて文...
-
エクセル オートフィルタで絞...
-
エクセルの一つのセルに複数の...
-
EXCEL VBA セルに既に入...
-
【Excel】 セルの色での判断は...
-
(Excel)数字記入セルの数値の後...
-
エクセル “13ヶ月”を“1年1ヶ月...
-
excelのCOUNTIF関数で、『範囲=...
-
Excel2003 の『コメント』の編...
-
枠に収まらない文字を非表示に...
-
Excelで住所を2つ(町名迄と番...
-
複数のセルのいずれかに数字が...
おすすめ情報