Задание диапазона в VBA

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Задание диапазона в VBA (Макросы/Sub)

kudim94

Дата: Четверг, 11.05.2017, 13:24 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 10

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте! Подскажите, как через VBA правильно задать диапазон ячеек следующего типа.

[vba]

Код

Worksheets("база").Range(Cells(2, i), Cells(iLastRow, i)).Select

[/vba]

То есть, я хочу чтобы макрос выделял каждый столбец по очереди при выполнении каких-либо условий.
При выполнении моего кода вылетает ошибка "Application-defined or object-defined error"

Ответить

Karataev

Дата: Четверг, 11.05.2017, 13:29 | Сообщение № 2

Группа: Проверенные

Ранг: Старожил

Сообщений: 1334

Репутация: 533 ±

Замечаний: 0% ±

Excel

Ошибка потому, что если у "Range" в скобках не указывать лист, то подразумевается активный лист. А если лист "база" не является активным, то происходит ошибка.
Вариант 1
[vba]

Код

Worksheets("база").Range(Worksheets("база").Cells(2, i), Worksheets("база").Cells(iLastRow, i)).Select

[/vba]
Вариант 2
[vba]

Код

With Worksheets("база")
.Range(.Cells(2, i), .Cells(iLastRow, i)).Select
End With

[/vba]
И еще одно замечание. Метод "Select" можно сделать только, если лист "база" будет активным. Обычно "Select" не используется и программисты обращаются к нужному диапазону без метода "Select". Просто вместо метода "Select" подставьте нужный метод, чтобы обработать фрагмент.

Сообщение отредактировал Karataev - Четверг, 11.05.2017, 13:34

Ответить

kudim94

Дата: Четверг, 11.05.2017, 13:40 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 10

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Спасибо огромное! Это помогло.

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Задание диапазона в VBA (Макросы/Sub)

Страница 1 из 1
1