Excel Vba Convert String Array To Set