"...файл существует, заменить?"

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
aks_sv
Сообщения: 53
Зарегистрирован: 30 окт 2007, 06:38

Уважаемые, здравствуйте!
У меня такой вопрос:
Имеется xls-файл, после открытия и внесения в нем изменений он программно закрывается и сохраняется в том же месте откуда открывался. Как убрать окно "...файл существует, заменить?"
Где-то в форуме видел, но не могу найти.
Vikar
Сообщения: 51
Зарегистрирован: 24 апр 2007, 14:21

Не это ли ищешь?
Application.DisplayAlerts=false
Teslenko_EA
Сообщения: 526
Зарегистрирован: 04 фев 2007, 18:37
Откуда: Сургут
Контактная информация:

Здравствуйте aks_sv.
мне кажется Вы пытаетесь бороться с созданной проблемой.
проверьте код Вашего приложения скорее всего в нем присутствует подобная строка:

Код: Выделить всё

ActiveWorkbook.SaveAs .......
замените ее на строку

Код: Выделить всё

ActiveWorkbook.Save
и выключение системных сообщений не потребуется.
Евгений.
aks_sv
Сообщения: 53
Зарегистрирован: 30 окт 2007, 06:38

Vikar, Спасибо. То, что нужно.
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Teslenko_EA, Я сохраняю файл под тем же именем.
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Teslenko_EA, Я наверно неправильно поставил вопрос. У меня в коде присутствует ActiveWorkbook.SaveAs... потому, что я изменяю шаблон, а он при открытии добавляет единицу к имени файла.
Ответить