Sub Test()
Application.DisplayAlerts = wdAlertsNone
'здесь код макроса
Application.DisplayAlerts = wdAlertsAll
End Sub
Как подавить предупреждение?
Нельзя ли это подавить? А то ждешь, когда макрос доработает (он у меня в фоне крутится, чтобы не мелькал по глазам). Потом понимаешь, что уж слишком долго. Переключаешься на окно Ворда, а там вывешена табличка с упомянутым текстом. Время потеряно, начальство орет, голова болит и пр. сопутствующие удовольствия. И все из-за проклятой таблички. :D
Реальный код есть? Экстрасенсорикой не балуюсь. Мож там хватит только DoEvents поставить, а может вообще код переделывать:rolleyes:
Цитата: Dmitry2064
...Так вот при выполнении (в начале) выскакивает окно с предупреждением [COLOR="Navy"]"Недостаточно памяти. Операцию нельзя будет отменить. Продолжить?"[/COLOR]
Нельзя ли это подавить?..
Нельзя ли это подавить?..
Попробуйте использовать свойство DisplayAlerts объекта Application.
Код:
сработало. Правда теперь надо держать ухо востро, иначе что-нить подпортится, а я и не узнаю.
Спасибо большое.
А весь код передавать наверное не стоит, т.к. он довольно громоздкий, да еще из-под одного макроса выполняется куча других. Т.е. пришлось бы передавать кучу текста и найти там что-нить было бы проблематично. Пока работает и с такой командой. Спасибо еще раз.