lior03
08-04-2006, 10:06 AM
hello
i want to use a msgbox to sum a total of all cells in a range that has a formula
Sub sumformula()
Dim cell As Range
For Each cell In selection
If cell.HasFormula = True Then
MsgBox cell.Value + 1
End If
Next
End Sub
i got lost.
thanks
i want to use a msgbox to sum a total of all cells in a range that has a formula
Sub sumformula()
Dim cell As Range
For Each cell In selection
If cell.HasFormula = True Then
MsgBox cell.Value + 1
End If
Next
End Sub
i got lost.
thanks