как проверить существование листа используя Boolean?

[Kim K.]

Добрый день.
Прошу прощения, если мой вопрос покажется глупым, но я попытался обойти for i=1 to Sheets.Count в поиске существования листа с заданным именем -- с помощью Boolean
dim bool as boolean
bool = Worksheets("ааа").Activate
If bool = True Then
...
когда лист с именем "ааа" присутствует, все ок; но если листа с именем "ааа" нет, ругается.
возможно я подхожу к вопросу не с той функцией... подскажите, как можно вопрос решить.
Я програмирую совсем мало, буду очень признателен за помощь.

[iGrok]

Как вариант - использовать обработчик ошибок On error..

[Kim K.]

Спасибо, iGrok, попробую.

[Денис]

буду очень признателен за помощь.

Хотел быстро привести пример с For Each но что-то не срослось, как вариант могу привести пример с массивом и book.Worksheets.Count но не буду ибо криво. Давайте подождем, что скажет KL

[Kim K.]

Ок, Денис, спасибо, что обнадежили!
буду рад подождать!

[KL]

Код: Выделить всё

dim ws as worksheet
On error resume next
Set ws=worksheets("aaa")
On error goto 0
If not ws is nothing then msgbox ws.name

[Kim K.]

Спасибо, KL, все работает!
можно один уточняющий вопрос?
On error resume next я нашел что значит. а что такое On error goto 0 ?

я попытался его протестить в своем тестовом модуле, и вне зависимости от того, есть ли лист "ааа" или его нет, error в этой строке не возникал...

[alibek]

On Error Goto 0 отключает обработку ошибок.

[Kim K.]

On Error Goto 0 отключает обработку ошибок.

а какая же функция этого кода в вышеприведенном?

[alibek]

Чтобы не игнорировались ошибки, если они случатся.

[Kim K.]

Чтобы не игнорировались ошибки, если они случатся.

верно ли я понял?

Код: Выделить всё

On error resume next ' выключается реагирование на ошибку, при error действие переходит к след. команде
Set ws=worksheets("aaa")
On error goto 0 ' включается реагирование на все последующие ошибки

?

[alibek]

Да.
Только правильнее говорить не "выключается реагирование на ошибку", а "задается обработка ошибок".

[Kim K.]

Ок, спасибо!
меня просто немного с толку сбил ваш ответ:

On Error Goto 0 отключает обработку ошибок.

получается, что наоборот, включает... т.е. задает.

[iGrok]

Ок, спасибо!
меня просто немного с толку сбил ваш ответ:

On Error Goto 0 отключает обработку ошибок.

получается, что наоборот, включает... т.е. задает.

Нет. "Ошибка обрабатывается" - значит, что при ошибке мы выполняем какие-то действия.
"Обработка ошибок отключена" - значит, что при ошибке происходят стандартные действия. Т.е. сообщение об ошибке и прекращение выполнения кода.

[alibek]

получается, что наоборот, включает... т.е. задает.

Нет. Ошибка будет обработана в любом случае, либо рантаймом VBA (и тогда программный код аварийно завершит работу), либо программным кодом пользователя. "Отключает" следует читать, как "отключает программную обработку ошибок".

[Kim K.]

ага.
теперь вроде понятнее стало)
Спасибо!