Sorting Array Using Functions Vba Insurance