-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Закрыть файл EXCEL без показа вопроса о сохранении

Вторник, 05 Мая 2015 г. 13:21 + в цитатник
Добрый день.
В форме на кнопке сидит код:
Set xl = CreateObject("Excel.Application")
         Set xw = xl.Workbooks.Open(ConnectTbl("tbl_Slujba") & "01_Для базы\КК234567.xlsx")
         xw.Application.Sheets("КК" & DCount("nomerKK", "qProtInic4")).Select
         xw.Application.Sheets("КК" & DCount("nomerKK", "qProtInic4")).Copy
         xw.Close
         xl.Visible = True


Т.е. на основе многолистового файла EXCEL КК234567 создаем копированием листа файл с одним определенным листом, а первый закрываем.
Проблема в том, что на некоторых машинах эта процедура происходит нормально, а на некоторых выскакивает сообщение "Нужно ли сохранить изменения в файле КК234567?". Как гарантированно подавить (или избежать) этого сообщения?
Спасибо.

http://www.sql.ru/forum/1155138/zakryt-fayl-excel-bez-pokaza-voprosa-o-sohranenii


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку