Hello,

I am trying to do a sum check here and below is what I put:

Sub exercise()

' sum check
If Application.WorksheetFunction.Abs(Sum(Range("A:A"))) > 0.001 Then
MsgBox ("Good to Go")
Else
MsgBox ("Failed")
End If

End Sub

I basically want to make sure the absolute value of the sum result to be less than 0.001

Any help is appreciated.