Excel Vba Sort String Array C