Excel Vba Sort Array Of Numbers Function