Sureshaddin.xla

If you find that Sureshaddin.xla contains useful logic but looks ancient (think Excel 2003 era), consider upgrading it:

' Public function callable from a worksheet
Public Function SafeDivide(numerator As Double, denominator As Double) As Variant
    On Error GoTo ErrHandler
    If denominator = 0 Then
        SafeDivide = CVErr(xlErrDiv0)
    Else
        SafeDivide = numerator / denominator
    End If
    Exit Function
ErrHandler:
    SafeDivide = CVErr(xlErrValue)
End Function