Excel Vba Array String And Vector