Frank: strikethrough condition

[JoeC]

Hi Frank
Can you help with the VBA wording I need to sum a col
with amounts strikethrough only?
Regards
JoeC

 

[Vasant Nanavati]

It is somewhat pointless to address your question to a specific person or
persons.

Put the following function into a standard module:

Function SumStrikethrough(rng As Range) As Integer
Dim c As Range
For Each c In rng.Cells
SumStrikethrough = SumStrikethrough - c.Font.Strikethrough
Next
End Function

Then you can use SumStrikethrough just like SUM.