Object Variable Vba Function With Optional Inputs