Excel Vba String Array To Int