vba сортировка массива по возрастанию

Ответ от Ѓдачник[гуру]
Сортировка чисел в массиве - гугли "Пузырьковая сортировка".
Основная идея
For i=1 To N-1
For j=i+1 To N
If A(i) < A(j) Then ' Если одно число меньше другого
Q = A(i) ' Меняем
A(i) = A(j) ' их
A(j) = Q ' местами
End If ' Конец If
Next j
Next i

В результате числа будут отсортированы от большего к меньшему
Ввод и вывод и прочее оформление сам добавь, как в моей программе, которую я тебе уже писал.