Deleting formula in cell if sum is 0

  • Thread starter Thread starter Aloysicus
  • Start date Start date
A

Aloysicus

Hi,

Was wondering if there is a macro which would be able to identify that the
sum of 2 cells is 0 and therefore deleting the formula?

Any help would be greatly appreciated
 
Something like

Sub Test()
Dim cell As Range

For Each cell In ActiveSheet.UsedRange
If cell.HasFormula Then
If cell.Value = 0 Then
cell.Value = ""
End If
End If
Next cell
End Sub
 
Back
Top