作者home0303 (Blue night)
看板Office
标题[算表] Excel自订颜色条件加总函数
时间Sat Oct 12 13:54:58 2019
软体:EXCEL
版本:2010
类似Sumif的函数 只是条件是符合指定底色者予以加总 写法如下
Function SumColor(金额范围, 颜色储存格)
Application.Volatile
For Each cell In 金额范围
If cell.Interior.Color = 颜色储存格.Interior.Color Then
SumColor = SumColor + cell
End If
Next
End Function
特别加了Volatile以避免函数不更新的情形
不过事实上还是没有解决问题
第一次写入函数 可以准确运算出结果
但是若修改金额范围的 "储存格底色" 则函数不会更新
需要按下F9键才会重算
请问有什麽办法可以解决此一困境吗
毕竟写给别人用的话 使用者程度参差不齐
让人算错的结果就不好了
谢谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 223.140.31.103 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1570859700.A.565.html
1F：→ soyoso: 这要看是否有修改填满色彩触发事件，如果没有的话，其他触 10/12 15:42
2F：→ soyoso: 发事件，如worksheet_selectionchange内重新运算 10/12 15:43
3F：→ soyoso: application.calculate，看是否就可达成要的结果 10/12 15:43
4F：→ home0303: 收到 谢谢S大 10/12 15:46