Здравствуйте, уважаемые форумчане. Не удается никак сделать объединение областей ссылок на ячейки с помощью цикла. Вылетает ошибка "1004". Код вот такой:
Код |
---|
Set verh = Worksheets("Лист1").Range("C3:O3")
For ii = 5 To 73 Step 2
Set verh = Union(verh, Worksheets("Лист1").Range(Cells(ii, 3), Cells(ii, 15)))
Next |
Помогите, пожалуйста. Как это можно сделать?
Надо было так:
Код |
---|
Set verh = Worksheets("Лист1").Range("C3:O3")For ii = 5 To 73 Step 2
Set verh = Union(verh, Range(ThisWorkbook.Sheets("Лист1").Cells(ii, 3), ThisWorkbook.Sheets("Лист1").Cells(ii, 15)))
Next |