I have overloaded a function 3 times.
I saw that VBA supports function overloading but i am unable to execute this without getting error.
Function nothingToZero(X As Integer) As Integer
If X = "" Then
nothingToZero = 0
Else
nothingToZero = X
End If
End Function
Function nothingToZero(X As Single) As Integer
If X = "" Then
nothingToZero = 0
Else
nothingToZero = X
End If
End Function
Function nothingToZero(X As String) As Integer
If X = "" Then
nothingToZero = 0
Else
nothingToZero = X
End If
End Function