Summings cells in Italics
Only by VBA
Sub SumItalics()
Dim cell As Range
Dim tmp
For Each cell In Columns(12).Cells
If cell.Font.Italic Then
tmp = tmp + cell.Value
End If
Next cell
MsgBox tmp
End Sub
--
HTH
Bob
(there's no email, no snail mail, but somewhere should be gmail in my addy)
"Luke" wrote in message
...
Is there a way to sum ONLY the values in Italics in a column of data?
Any help would be most appreciated
|