Программироание VBA. Надо написать программу, в которой есть функция . Функция принимает массив . Она сортирует массив (числа ) по возрастанию . После надо вывести полученный результат на печать

Что за глупый вопрос? Где-то было написано, что нужен ввод с клавиатуры? Все, что в задании не оговорено, пишется так, как человек сочтет нужным.

Запустил я ваш файл .При запуск программы мне выдает окно , где написано Macros , Macros name .....

Вы что, никогда с VBA не работали? Наверняка же стоит запрет на выполнение макросов...

Разрешен

Я там Вам личное сообщение написал

Private Sub CommandButton1_Click()    Dim n As Integer, R As Range    n = Cells(1, 4).Value    Set R = Range(Cells(5, 2), Cells(4 + n, 2))    MySort R.Offset(0, -1), REnd SubPrivate Sub MySort(RFrom As Range, RTo As Range)' На самом деле сто лет она тут не нужна, глупо придумано задание    RFrom.Copy RTo    RTo.Sort RTo.Range(Cells(1, 1), Cells(1, 1))End SubФайл MS Excel 2003 во вложении.