本人的经验是从自定义函数开始学习VBA是一个比较好的方法。需求是最大的学习动力，而且做出来马上能用，带着任务学习vba。
下面这段代码是类似标准函数SUM,只是将有删除线的单元格排除在外。原文件可以到我分享的云空间去下载。
Public Function mysum(qu As Range)
Dim s As Double
Dim b
mysum = 0
For Each b In qu
If b.Font.Strikethrough = False Then
mysum = mysum + b.Value
End If
Next
End Function
下面这段代码是类似标准函数SUM,只是将有删除线的单元格排除在外。原文件可以到我分享的云空间去下载。
Public Function mysum(qu As Range)
Dim s As Double
Dim b
mysum = 0
For Each b In qu
If b.Font.Strikethrough = False Then
mysum = mysum + b.Value
End If
Next
End Function
