EXCEL.VBA应用 非隐藏单元格求和

有时候，我们会对一些数据进行隐藏（如筛选）后进行求和等运算，但在现成的公式却无法找到可利用的，所以只能依靠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
    Next
End Function