Excel Vba Sub Function Return Value Might Be Unset