Excel Vba Check If Value Is String A Class