Работа с неактивным листом

[-Anton-]

Добрый день, народ!

Подскажите, пожалуйста, почему так:

Set Massiv = Worksheets(3).Range(Cells(1, 4), Cells(588, 4))

Set Massiv = Worksheets(3).Range("D1:D588")

Первая строка вызывает ошибку:

Run-time Error 1004 Application-defined or object-defined error

Вторая строка работает на ура.


upd.1

Если добавить в начало

Worksheets(3).Activate

то первая строка срабатывает нормально.
Вторая строка работает и без активации листа

Возможно ли использовать первую строку без активации листа?
(а то во время работы программы, при каждом вызове функции, листы мелькают в глазах)

[-Anton-]

хм.. похоже проблему решил. но как-то криво, ИМХО...

Так работает:

Set Massiv = Worksheets(3).Range(Worksheets(3).Cells(1, 4), Worksheets(3).Cells(588, 4))

[IgorGO]

With Worksheets(3)
  Set Massiv = .Range(.Cells(1, 4), .Cells(588, 4))
end with

[-Anton-]

Сообщение от IgorGO

With Worksheets(3)
  Set Massiv = Range(.Cells(1, 4), .Cells(588, 4))
end with

Понял свою ошибку. Спасибо. А перед Range точку ставить не надо?

[EducatedFool]

хм.. похоже проблему решил. но как-то криво, ИМХО...

вовсе не криво - так и нужно было

Для каждого Range и Cells надо явно указывать, к какому листу относится вызов
(по умолчанию - к активному листу. из-за этого и была ошибка)

[-Anton-]

Сообщение от EducatedFool

вовсе не криво - так и нужно было

Для каждого Range и Cells надо явно указывать, к какому листу относится вызов
(по умолчанию - к активному листу. из-за этого и была ошибка)

Понял, спасибо за помощь.