Excel 所有红色字体的求和
生活随笔
收集整理的這篇文章主要介紹了
Excel 所有红色字体的求和
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
打開Excel,按alt+F11 開啟宏模式
選擇“插入”---》“模塊”
Function sumcolor(rng1 As Range, rng2 As Range) As Single
Dim cell As Range
sumcolor = 0
For Each cell In rng1
If cell.font.Color = rng2.font.Color Then sumcolor = sumcolor + cell.value
Next cell
End Function
?
退出宏,在Excel中任意單元格輸入:=sumColor(A1:A15,A4)? ,其中A1:A15是計算單元格的范圍,A4是指標紅的單元格。
會將A1:A15范圍內單元格的字體顏色和A4單元格顏色想比較。如果相同則會求和。
?
總結
以上是生活随笔為你收集整理的Excel 所有红色字体的求和的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: application作用域
- 下一篇: Vim查找替换操作 --- 查找和替换