Задание на языке VBA для Excel Заполнить диапазон ячеек В4:Н9 случайными положительными и отрицательными числами. Упорядочить их по возрастанию по каждому столбцу.
Sub aaa() Randomize Timer For r = 4 To 9 For c = 2 To 8 Cells(r, c) = 10 * Rnd - 5 Next c Next r For c = 2 To 8 Set d = Range(Cells(4, c), Cells(9, c)) d.Sort d, xlAscending Next c End Sub
Теперь все работает хорошо, можно еще комментарии пожалуйста по каждой строке ?
Я же не приказываю, а вежливо спрашиваю)
Создам отдельную тему, сделаешь ?
А сам то давно перестал быть юнцом ? Сидишь в интернете и еще...