How to Count Strike throughs

[trvlnmny]

I am working with Office 2003 and W XP.
I have a spread sheet with many, many rows.
When a row has been checked a strike through was done to the row.
This was done by selecting the row or rows then going to Format > Font

Effects > Strike trough.

I would now like to get a count of how many rows have a strike
thorough.
I only need to do this to column A as the strike through was applied
to entire rows.

How do I accomplish this?

Thanks for any and all help.

 

[isabelle]

hi,

you have to use vba

Sub Macro1()
Dim n As Long, c As Range
For Each c In Range("A1:A" & Cells(Cells.Rows.Count, 1).End(xlUp).Row)
If c.Font.Strikethrough Then n = n + 1
Next
MsgBox n
End Sub

--
isabelle



Le 2012-08-23 15:59, trvlnmny a écrit :