函數Color_Count(Rng表示範圍，rn表示範圍)
Rng是要統計的區間。
Rn是從中提取顏色的單元格。
申請。不穩定的
尺寸rng1作為範圍
mycolor = rn。內部顏色指數
對於rng中的每個rng1
如果rng1。interior . ColorIndex = my color Then
mycount = mycount + 1
如果…就會結束
然後
Color_Count = mycount
結束功能