Vba Array Sort Function C