Excel Vba String Array To Byte