Заказ закрыт
Помогите, знатоки макросов Excel !

Бюджет: 200 руб
2.41 $ – 2.09 €
Нужно добить макрос.

Sub Макрос()
Range(ActiveCell, Cells(ActiveCell.Row + 9, ActiveCell.Column)).Copy
Cells(ActiveCell.Row, 4).Activate
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub

Нужно чтобы он зациклился. То есть, повторил всё то же для каждой 10-й ячейки внизу clip2net.com/s/3vC2Ho4
Опубликован 15.03.2016 в 23:51 Последнее изменение: 16.03.2016 в 13:21
Заказ находится в архиве

Выберите способ верификации:

Обновите страницу после прохождения верификации.