Excelでは、セルの色で計算する機能はありません。 しかし Microsoft Visual Basic for Applications (VBA) は、セルの色をもとに計算するカスタム関数を作ることができます。 今回は、ExcelでColorFunctionを作成し、使用する方法を紹介します。

例えば、ある会社の商品注文のデータセットがあるとする。 カラム 注文数量 は、配送状況によって色分けされています。 配送された注文は薄緑色、配送中の注文は薄オレンジ色になります。 同じ色のセルを数えれば、注文を受け取った顧客と受け取っていない顧客の数がわかります。 同じ色のセルを合計すれば、配送した注文や配送中の注文の総量がわかります。

練習用ワークブックをダウンロードする

ExcelのColorFunction

ステップ1 : VBAウィンドウでMacro Moduleを開く

まず最初に ブイビーエー を押して、ウィンドウを開きます。 ALT+F11。 その後、左のパネルからシート名を右クリックし 挿入; モジュール

その結果 モジュール ボックスが開かれます。

ステップ2 ColorFunction を作成するための VBA コードを挿入します。

次のコードを挿入してください。 モジュール をクリックし、ボックスを閉じます。 ブイビーエー ウィンドウに表示されます。

 Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean) Dim rCell As Range Dim lCol As Long Dim vResult lCol = rColor.Interior.ColorIndex If SUM = True Then For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = WorksheetFunction.SUM(rCell, vResult) End If Next rCell Else For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = 1 + lColor...vResult End If Next rCell End If ColorFunction = vResult End Function 

ここでは、VBAのコードで、以下の名前のカスタム関数を作成しています。 カラーファンクション という引数を与えると、色のついたセルを数えるようになる。 FALSE という引数を与えれば、色のついたセルを合計してくれます。 真です。

ステップ3 : ワークブックをExcelマクロ有効ワークブックとして保存する

Excelのワークブックを保存する際に .xlsm フォーマットで保存します。 ファイル をクリックすると、Excelウィンドウの左上隅に表示されます。

その後、Select 別名で保存する。

次に、以下を選択します。 エクセルマクロ対応ワークブック（*xlsm） をクリックします。 保存する。

ステップ4 : ColorFunction を使って色のついたセルを数える

これで、カスタムの カラーファンクション。

薄緑色のセルの数を得るには、空のセルに次の数式を入力します。

=ColorFunction(F5,$D$5:$D$11,FALSE)です。

これです。 F5 = 色をカウントする基準セル

D$5:$D$11 = カウントの範囲

ファルス は、基準セルと同じ色を持つセルの個数を数えることを示す

プレス エンタメ をクリックすると、薄緑色の細胞のカウントが得られます。

同様に、薄いオレンジ色のセルのカウントを取得することができます。

ステップ5 : ColorFunction を使って色のついたセルの合計を計算する

薄緑色のセルの合計を求めるには、空のセルに次の数式を入力します。

=ColorFunction(F5,$D$5:$D$11,TRUE)です。

これです。 F5 = 色の合計を行う基準セル

D$5:$D$11 = 合計の範囲

真 は、基準セルと同じ色を持つセルの数が加算されることを示す。

を押すと、薄緑色のセルの合計が表示されます。 ENTER.

同様に、薄いオレンジ色のセルの合計を求めることができます。

色つきセルの数え方と和の取り方の代替案

を使うのではなく カラーファンクション。 の場合、色のついたセルの数を求める方法と、色のついたセルを合計する方法の2種類があります。

1.FILTER関数とSUBTOTAL関数の使い方

色付きのセルのカウントと合計を得るには、次のようにします。 フィルター と SUBTOTAL関数 .

まず データ タブをクリックし フィルター

その後、各列のヘッダーの横に下向きの矢印が表示されますので、その矢印をクリックします。 注文数量 (色付き欄）へ移動します。 色で絞り込む で、ライトグリーンの色を選択します。

これで、この列には薄緑色のデータのみが表示されます。 カウントを得るには、次の数式を入力します。

=小計(2,d5:d11)

こちら 2 は、そのセルがカウントされることを示し D5:D11 はデータの範囲です。

を押した後 エンタメ をクリックすると、薄緑色のセルの数が表示されます。

色のついたセルの合計を求めるには、次の数式を入力します。

=subtotal(9,d5:d11)

こちら 9 は、そのセルが加算されることを示し D5:D11 はデータの範囲

を押した後 エンタメ を選択すると、薄緑色のセルの合計が得られます。

フィルターを薄いオレンジ色に変更することで、オレンジ色のセルのカウントと合計を得ることができます。

2.GET.CELL関数の使用

を使うことで、より効果的になります。 GET.CELL（ゲット・セル 関数では、色のついたセルを数えたり、合計したりすることもできます。

まず 計算式 タブを選択し ディファイン名

A 新名称 のような名前を入力します。 カラー において 名称 ボックスに数式を挿入します。 について言及しています。 を押してください。 OKです。

=get.cell(38,'セル取得'!$d5)

ここで38は、数式が参照されるセルのカラーコードを与えることを示し 'GET CELL'!$D5。 は参照されるセル(色のついた列の列見出しの後の最初のセル)

今すぐタイプ =カラー (で入力した名前）。 名称の定義 ボックス) を、あなたの色のついたコラムの隣のコラムに追加します。

を押した後 エンタメ をドラッグして、セル E5 をデータセットの末尾に追加すると，カラム E .

ここで、次の数式を入力して、薄緑色のセルの数を求めます。

=countif($e$5:$e$11,50)です。

これです。 E$5:$E$11 はカウントの範囲、50はライトグリーンのカラーコードです。

を押した後 入力 を選択すると、緑色に着色されたセルの数が表示されます。

次の数式を入力し、薄緑色のセルの合計を求めます。

=SUMIF(E5:E11,50,D5:D11)

これです。 E5:E11 は基準範囲、50はライトグリーンのカラーコード、そして D5:D11 は和の範囲です。

プレス エンタメ と入力すると、緑色に着色されたセルの合計が得られます。

同様に、薄いオレンジ色のセルのカウントと合計を求めることができます。

結論

私はあなたがExcelでColorFunctionを作成し、使用できるようになりました記事を通過した後、願っています。 あなたが何か問題に直面した場合は、コメントを残してください。