Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.01.2019, 12:49   #1
RipVanWinkel
Пользователь
 
Регистрация: 07.01.2017
Сообщений: 16
По умолчанию Макрос по неизвестным причинам выводит ошибку Run-time 6 Overflow

Здравствуйте.
Столкнулся с такой непонятной проблемой, над которой просто голову сломал.

Есть два абсолютно одинаковых скрипта, размещенных в абсолютно одинаковых книгах.
Скрипт 2.xls при срабатывании выводит ошибку Run-time 6 Overflow
А скрипт 1.xls - не показывает ошибки и работает нормально.

Причем - оба скрипта - абсолютно - одинаковы.

Ответьте, кто разбирается в VBA - где причина ошибки Run-time 6 Overflow - в скрипте 2.xls и как ее устранить ?
Вложения
Тип файла: xls 1.xls (50.0 Кб, 12 просмотров)
Тип файла: xls 2.xls (46.5 Кб, 13 просмотров)
RipVanWinkel вне форума Ответить с цитированием
Старый 05.01.2019, 13:52   #2
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Нельзя делить на 0!
И кстати в обоих книгах нельзя
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 05.01.2019 в 13:57.
Hugo121 вне форума Ответить с цитированием
Старый 05.01.2019, 14:04   #3
RipVanWinkel
Пользователь
 
Регистрация: 07.01.2017
Сообщений: 16
По умолчанию

Hugo121, у меня тоже была мысль, что здесь что-то связанное с делением на ноль.

Просто непонятно - почему макрос файла 1.xls работает ?
Там же тоже получается - деление на тот же самый ноль.

Подскажите - что изменить в макросе 2.xls, чтобы не появлялась эта ошибка ?
RipVanWinkel вне форума Ответить с цитированием
Старый 05.01.2019, 14:06   #4
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

У меня и первый не работает. А если изменить данные на листе - то работает.
Что изменить в макросе - думать не буду, недосуг. Ну обойдите ошибку, или заменяйте 0 на 1...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 05.01.2019, 14:10   #5
RipVanWinkel
Пользователь
 
Регистрация: 07.01.2017
Сообщений: 16
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
заменяйте 0 на 1...
А где заменить 0 на 1 ?
У меня же на листе - нет нулей.
RipVanWinkel вне форума Ответить с цитированием
Старый 05.01.2019, 14:17   #6
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

В коде. Если разница=0, то 1. Ну или что-то другое, может предыдущее значение нужно подставлять.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 05.01.2019, 14:59   #7
RipVanWinkel
Пользователь
 
Регистрация: 07.01.2017
Сообщений: 16
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Если разница=0, то 1
Подскажите - как это в коде написать ?
RipVanWinkel вне форума Ответить с цитированием
Старый 05.01.2019, 16:02   #8
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

На 16-ом і, получаете х2=х1=1210
Код:
x2 = IIf(l2 = x1, l2 + 0.001, l2)
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 06.01.2019, 03:59   #9
RipVanWinkel
Пользователь
 
Регистрация: 07.01.2017
Сообщений: 16
По умолчанию

Aleksandr H. понятно.
Спасибо за ответ.
RipVanWinkel вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Run time error 91: Object variable or with block variable non set, excel 2010 vba (не могу найти ошибку) ac1-caesar Microsoft Office Excel 6 16.10.2014 15:03
Run-time error '91' Ефим Петрович Microsoft Office Access 1 04.04.2014 13:09
Помогите исправить ошибку:run-time error 424 Kigali Microsoft Office Excel 2 22.09.2013 16:22
Компонент работает в run-time, но не работает в design-time hon Компоненты Delphi 3 20.02.2013 20:17
как перевести с программы Excel в Word выдаёт ошибку Run-time error '9105' vbn14 Microsoft Office Excel 2 21.02.2012 21:01