エクセルについて教えてください

Question

エクセルについて教えてください。
水揚表に、1～100まで入力できて
3キロ以下
3～5キロ
5～7キロ
7キロ以上で4段階に色分けしています。
そこまでは、条件付きセルの設定で分けているのですが
その色分けしたものを（4段階を）それぞれで数字の合計を出したいです。
添付したファイルを見ていただくとわかるかもしれませんが
番号の1～100を含めた表は固定化し入力できないようにしたいです。
（入力した数字だけ一斉削除したいので）
よろしくお願いします

Accepted Answer

VBAを使った関数でよければ
https://okwave.jp/qa/q9479525.html
で紹介したコードがそのまま使えると思います。

この関数を標準モジュールに配置し
集計したいセルに次のような関数を埋めると
=SumColor(A3:T12,B3)

セル範囲：A3:T12の中で、
B3セルと同じ背景色のセルの値を合計します。

なお、
背景色だけが変わるような操作の場合
この関数は再計算が行われませんので
関数を埋めたセルを選択し、
F2キー、エンターキーの操作を行う必要があります。

Option Explicit

Function SumColor(TargetRange As Range, BaseColorCell As Range) As Double
　Dim wkCounter As Double
　Dim wkRange As Range

wkCounter = 0
　For Each wkRange In TargetRange
　　If wkRange.Interior.ColorIndex = BaseColorCell.Interior.ColorIndex Then
　　　wkCounter = wkCounter + wkRange.Value
　　End If
　Next wkRange

SumColor = wkCounter

End Function

Answer

こういう書き方は困ります。ジャスト３キロ、５キロ、７キロはどうするのか判りません。（以上、以下はジャストを含みます。３キロ以上だと３キロを含みます。３キロを含まいなら３キロより小さいという書き方をして下さい。）ジャストは大きい方に入れました。 (1)３キロより小さい。（３キロ含まない） (2)３キロ以上５キロより小さい。（３キロ含む） (3)５キロ以上７キロより小さい。（５キロ含む） (4)７キロ以上。（７キロ含む） (1)=SUMIFS(B3:T12,B3:T12,"<3") (2)=SUMIFS(B3:T12,B3:T12,">=3",B3:T12,"<5") (3)=SUMIFS(B3:T12,B3:T12,">=5",B3:T12,"<7") (4)=SUMIFS(B3:T12,B3:T12,">=7")-4995 でどうでしょうか。 4995は、11～100 の合計です。間の数字も加算されるので引いています。

Answer

4段階くらいであれば、SUBTOTAL関数とフィルタで対応出来ると思います。
（表はずらっと横に並べる形のフォーマットにしたほうが使い易いでしょう）

真面目にやるならマクロの記録で、VBAマクロ化してしまい
マクロ実行で算出するようにした方が、番号欄とか無視出来ますし便利です。

Answer

4段階に色分けして条件付きセルの設定で分けているのでしたら、4段階に色分けした条件で4種のコード(例えば1,2,3,4)を別の表として作り、その表をピボットテーブルで集計してはいかがでしょうか。

エクセルについて教えてください

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

その他の回答（4件中 1～4件目)

補足

補足

検索の多いキーワード

Powered by OKWAVE

エクセルについて教えてください

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

その他の回答 （4件中 1～4件目)

補足

補足

検索の多いキーワード

お礼をおくりました

さらに、この回答をベストアンサーに選びますか？

サポートシェアリングソリューション 企業・団体・テーマ

Powered by OKWAVE

その他の回答（4件中 1～4件目)

サポートシェアリングソリューション企業・団体・テーマ