ExcelBanter - View Single Post

THANKS TOM!

-----Original Message-----
MyFunction(MyVal,Optional Unit as String = "Kg")

Function MyFunction(MyVal, Optional Unit As String = "Kg")
MyFunction = Unit
End Function

Sub TesterAA()
res = MyFunction(10)
res1 = MyFunction(10, "lb")
Debug.Print res, res1
End Sub

returned

Kg lb

--
Regards,
Tom Ogilvy

"Juan" wrote in message
...
Hello to all,

I am trying to program a function that has two input
parameter, but i dont want one of the to be absolutly
necessary. I want it to have a default value in case I
dont put it on the function sintaxis. So far i have my
funciton done but i have to input both values.

i.e.

MyFunction(MyVal,Unit as String)

I want to be able to use it as =MyFunction(MyVal)and
have
a default unit such as "Kg" but beeing able to also
write
de function as =MyFunction(MyVal,"Lb")

Any help would ve highly appreciate.
Regards
JS

.