Object Variable Vba Function Stored Values