Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Касяк при запуске макроса при первом открытии файла - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Касяк при запуске макроса при первом открытии файла
Trank444 Дата: Вторник, 15.12.2015, 14:04 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 0% ±

Excel 2003
При запуске макроса выдается ошибка в строке:
[vba]
Код
Do While ActiveSheet.Range(Cells(i + 10, 3), Cells(i + 10, 3)) <> "Всего"
[/vba]

Ошибка возникает только при первом открытии документа. Если закрыть файл и снова открыть то макрос срабатывает.
Вопрос в следующем: в чем же тут ошибка и каким образом переписать условие цикла, чтобы макрос не падал?
Заранее спасибо
[moder]Код нужно обрамлять тегами. Кнопка #
К сообщению приложен файл: 0503171_1060500.xls (66.0 Kb)


Сообщение отредактировал _Boroda_ - Вторник, 15.12.2015, 14:42
 
Ответить
СообщениеПри запуске макроса выдается ошибка в строке:
[vba]
Код
Do While ActiveSheet.Range(Cells(i + 10, 3), Cells(i + 10, 3)) <> "Всего"
[/vba]

Ошибка возникает только при первом открытии документа. Если закрыть файл и снова открыть то макрос срабатывает.
Вопрос в следующем: в чем же тут ошибка и каким образом переписать условие цикла, чтобы макрос не падал?
Заранее спасибо
[moder]Код нужно обрамлять тегами. Кнопка #

Автор - Trank444
Дата добавления - 15.12.2015 в 14:04
Wasilich Дата: Вторник, 15.12.2015, 15:06 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1232
Репутация: 326 ±
Замечаний: 0% ±

2003
Ошибка возникает только при первом открытии документа
Ни разу! :)
 
Ответить
Сообщение
Ошибка возникает только при первом открытии документа
Ни разу! :)

Автор - Wasilich
Дата добавления - 15.12.2015 в 15:06
Trank444 Дата: Вторник, 15.12.2015, 15:14 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 0% ±

Excel 2003
Wasilic, Вот такая ошибка возникает.

Run-time error '1004':
Method 'Cells' of object '_Global' failed

Может что-то с настройками экселя? Частенько пользовался таким условием и никаких проблем не было.
 
Ответить
СообщениеWasilic, Вот такая ошибка возникает.

Run-time error '1004':
Method 'Cells' of object '_Global' failed

Может что-то с настройками экселя? Частенько пользовался таким условием и никаких проблем не было.

Автор - Trank444
Дата добавления - 15.12.2015 в 15:14
Karataev Дата: Среда, 16.12.2015, 12:50 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1336
Репутация: 533 ±
Замечаний: 0% ±

Excel
По поводу этой строки
[vba]
Код
Do While ActiveSheet.Range(Cells(i + 10, 3), Cells(i + 10, 3)) <> "Всего"
[/vba]
Вместо нее достаточно использовать такую строку
[vba]
Код
Do While ActiveSheet.Cells(i + 10, 3) <> "Всего"
[/vba]
Может быть при использовании этой строки не будет ошибки.
 
Ответить
СообщениеПо поводу этой строки
[vba]
Код
Do While ActiveSheet.Range(Cells(i + 10, 3), Cells(i + 10, 3)) <> "Всего"
[/vba]
Вместо нее достаточно использовать такую строку
[vba]
Код
Do While ActiveSheet.Cells(i + 10, 3) <> "Всего"
[/vba]
Может быть при использовании этой строки не будет ошибки.

Автор - Karataev
Дата добавления - 16.12.2015 в 12:50
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!