|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
07.05.2017, 14:00 | #1 |
Форумчанин
Регистрация: 22.12.2012
Сообщений: 139
|
Block with+if
Добрый день, подскажите как сделать чтобы работала проверка когда я выбираю другую книгу.В 1 экземпляре Excel открыто 2 книги
Сейчас выделяет желтым строку if и выдает сообщение "Object variable or With block variable not set" Код:
|
07.05.2017, 15:34 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
код написан в соотв. с синтаксисом VBA, макрос начинает выполняться без предупреждений
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
07.05.2017, 15:40 | #3 |
Форумчанин
Регистрация: 22.12.2012
Сообщений: 139
|
Так он не выполняется до конца, а останавливается на строке if
|
07.05.2017, 17:51 | #4 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
при такой ошибке всегда прописываю полные определения елемента. Может Sheets(1) заменить на Workbooks(istok).Sheets(1) или "." спереди поставить
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
07.05.2017, 21:12 | #5 |
Форумчанин
Регистрация: 22.12.2012
Сообщений: 139
|
Если меняю на Workbooks(istok).Sheets(1) ошибка такая же, если просто "." ошибка Object required
|
08.05.2017, 08:28 | #6 |
Участник клуба
Регистрация: 02.05.2010
Сообщений: 1,390
|
Нафига Вам там With? Чтоб лист активировать? Уберите его и ничего не изменится, а букв станет меньше. Попробуйте:
Код:
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728 Последний раз редактировалось kuklp; 08.05.2017 в 08:33. |
08.05.2017, 08:49 | #7 |
Участник клуба
Регистрация: 02.05.2010
Сообщений: 1,390
|
И не надо ничего активировать:
Код:
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728 |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
interbase execute block | bazanin | SQL, базы данных | 2 | 29.01.2013 11:10 |
Block if without end if (error) | zlobnaya | Microsoft Office Excel | 9 | 12.05.2012 22:25 |
Display block не block | mrgrudge | HTML и CSS | 2 | 25.12.2010 11:10 |