VBA function - output message if incorrect input data type used

[ronand0]

Hi,

I have written a function that requires an integer input, i.e.

Function MyFunction(MyInput as Integer)
[...code...]
End Function

When I use the function in Excel with a non-integer input the function returns the output #VALUE!

Could someone please let me know how to modify the code so that if a non-integer input was used the function would return the message "Must use integer input"

Any help would be much appreciated.

Thanks

Ronan

 

[Richard Schollar]

Hi & Welcome to the Board!

You would need to amend the function definition and internally test the data type of the argument:

Function MyFunction(MyInput as Variant)
If TypeName(MyInput)<>"Integer" Then 
  MyFunction = "Wrong data type - integer required!"
  Exit Function
End If
 
'rest of code...
End Function