在前面我們已經(jīng)說過顏色求和實際是個偽需求，但仍然有伙伴對顏色求和有需要，并且提出了不用VBA代碼做自定義顏色求和函數(shù)的需要。

有一些伙伴提出：“能否給一個不用VBA代碼的自定義顏色求和函數(shù)？”

簡單，小窩今天安排上了。

在《顏色求和實際是個偽命題，但還是告訴你4種方法！》中，小窩推薦了4種顏色求和方法，其中Sumcolor自定義函數(shù)用來挺高大上的，但是需要輸入VBA代碼。

如果討厭代碼，用LAMBDA函數(shù)自定義顏色求和函數(shù)就可以了。（WPS表格也支持LAMBDA自定義。）

打開“定義名稱”對話框，使用LAMBDA函數(shù)定義自定義函數(shù)SumColor。

在引用位置中輸入公式=Lambda(x,y,sum((get.cell(63,indirect("r"&row(x)&"c"&column(x),0))=get.cell(63,y))*x))

說明：

為自定義函數(shù)Sumcolor設(shè)置兩個參數(shù)，X和Y。X代表要求和的數(shù)據(jù)區(qū)域，Y代表顏色單元格。

get.cell(63,indirect("r"&row(x)&"c"&column(x),0))，可以獲得求和區(qū)域中所有單元格的填色數(shù)字。

get.cell(63,y)，獲得顏色單元格的填色數(shù)字。

最后用SUM函數(shù)對填色相等的單元格數(shù)字求和。
63,是單元格背景填色屬性代碼；如果需要按字體顏色求和，則用數(shù)字24。

現(xiàn)在可以用SumColor顏色求和了。

將文件保存為支持宏的xlsm格式。

后續(xù)如果有其他工作簿需要顏色求和，直接打開今天保存的xlsm文件，復(fù)制使用了自定義函數(shù)的單元格粘貼到新文件中，再清除粘貼的內(nèi)容即可使用自定義函數(shù)了，不用重新定義。

最后一次性附送大家按顏色計數(shù)、求平均值、求最大最小值的自定義函數(shù)公式。

按顏色計數(shù)Countcolor：

=Lambda(x,y,sum((get.cell(63,indirect("r"&row(x)&"c"&column(x),0))=get.cell(63,y))*1))

按顏色求最大值Maxcolor：

=Lambda(x,y,max((get.cell(63,indirect("r"&row(x)&"c"&column(x),0))=get.cell(63,y))*x))

按顏色求最小值Mincolor：

=Lambda(x,y,min((get.cell(63,indirect("r"&row(x)&"c"&column(x),0))=get.cell(63,y))*x))

按顏色求平均值Averagecolor：

=Lambda(x,y,let(a,get.cell(63,indirect("r"&row(x)&"c"&column(x),0)),b,get.cell(63,y),sum((a=b)*x)/sum((a=b)*1)))

本文配套的練習(xí)課件請?zhí)砑涌头⑿?span>buluowojiaoyu索取。

做Excel高手，快速提升工作效率，部落窩教育Excel精品好課任你選擇！

掃下方二維碼關(guān)注公眾號，可隨時隨地學(xué)習(xí)Excel：

相關(guān)推薦：

顏色求和實際是個偽命題，但還是告訴你4種方法！

用Lambda自定義函數(shù)

簡化公式的函數(shù)LET

用Excel+PPT批量添加日期和地點水印

版權(quán)申明：

本文作者小窩；部落窩教育享有稿件專有使用權(quán)。若需轉(zhuǎn)載請聯(lián)系部落窩教育。