有时候，我们会对一些数据进行隐藏（如筛选）后进行求和等运算，但在现成的公式却无法找到可利用的，所以只能依靠VBA来实现。创建自己的工作表函数，请参考：http://office.microsoft.com/zh-cn/assistance/HA010548462052.aspx
函数名：SumV编写时间：2006年1月2日支持：terryscz@163.com
Public Function SumV(ByVal Target As Range, Optional ByVal isVisible = True) For Each cw In Target.Columns For Each rw In cw.Rows SumV = SumV + IIf(rw.Hidden <> isVisible, rw.Cells(1, 1).Value, 0) Next NextEnd Function
