Сортировка массива с заменой элементов

[Цемент]

Требуется написать программу на VBA.
Задан целочисленный массив. Упорядочить по убыванию элементы массива, найти среднее арифметическое нечетных элементов и заменить ими все элементы кратные 3.