Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Ошибка при проверке, открыта ли книга
|
|||
|---|---|---|---|
|
#18+
Ошибка при проверке, открыта ли книга. Для проверки, открыта ли книга "ШАБЛОН 1.xls" используется: On Error Resume Next Set wb = Workbooks("ШАБЛОН 1.xls") If wb Is Nothing Then 'книги нет Workbooks.Open Filename:= _ "" & profilesDirectory & "\TEMPLATES\ШАБЛОН\ШАБЛОН 1.xls" Else Windows("ШАБЛОН 1").Activate End If Все работает нормально, но когда через несколько строк добавляю еще одну проверку: On Error Resume Next Set wb = Workbooks("ШАБЛОН 2.xls") If wb Is Nothing Then 'книги нет Workbooks.Open Filename:= _ "" & profilesDirectory & "\TEMPLATES\ШАБЛОН\ШАБЛОН 2.xls" Else Windows("ШАБЛОН 2").Activate End If происходят умунерастяжимые вещи - то VB не хочет открывать книгу "ШАБЛОН 2.xls" (игнорирует Open Filename) хотя книга не открыта, то не хочет активировать книгу "ШАБЛОН 2.xls", когда она открыта. Когда удаляю одну из проверок - все начинает работать нормально. Может быть, кто-нибудь сталкивался с такой ерундой? Подскажите, пожалуйста, господа профессоры :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.10.2004, 12:56 |
|
||
|
Ошибка при проверке, открыта ли книга
|
|||
|---|---|---|---|
|
#18+
Оператор On Error - декларативный. Он предписывает, что надо делать в случае ошибки. Поэтому повторение его несколькими строками ниже - тавтология, т.к. декларация относится ко всему модулю, а не к части кода. В приведенном фрагменте обработчик ошибки простирается до конца модуля. В самом обработчике производятся действия, порождающие ошибку. И всё из-за игнорирования простого правила: обработал ошибку - скажи об этом, не молчи! Например, так: Код: plaintext ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.10.2004, 13:24 |
|
||
|
|

start [/forum/topic.php?fid=60&msg=32725826&tid=2168798]: |
0ms |
get settings: |
8ms |
get forum list: |
17ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
86ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
46ms |
get tp. blocked users: |
2ms |
| others: | 251ms |
| total: | 430ms |

| 0 / 0 |
