Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
0 / 0 / 0
Регистрация: 17.06.2016
Сообщений: 43
1

Как сохранить файл эксел перезаписав старый без запроса на сохранение?

14.07.2016, 18:46. Показов 2198. Ответов 6
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Надо сохранить из аксесса эксел файл поверх старого с тем же названием, чтобы пользователь не опрашивался на перезапись.
Делаю так:

Visual Basic
1
2
3
4
5
6
7
8
9
10
    Dim fileobjexcel As Excel.Application
    Dim filexcel As Excel.Workbook
 
    Set fileobjexcel = New Excel.Application
 
    Set filexcel = fileobjexcel.ActiveWorkbook
    filexcel.SaveAs "имя файла", xlExcel7, , , , , , xlLocalSessionChanges
 
    fileobjexcel.Workbooks.Close
    Set fileobjexcel = Nothing
опрашивает на перезапись...
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.07.2016, 18:46
Ответы с готовыми решениями:

Сохранение в файл без запроса выбора папки
Доброго времени суток! Вопрос вот в чем, что нужно, чтобы при сохранения в файл не вылазило окно...

Как сохранить результат запроса ADOQuery1 во внешний файл ?
Как сохранить результат запроса ADOQuery1 во внешний файл ? Например, в dbf (VFoxPro) ?...

Как принудительно сохранить файл, без выскакивания окошка ' Файл 1.xls уже существует, заменить?'
Как принудительно сохранить файл, без выскакивания окошка ' Файл 1.xls уже существует, заменить?'

Как сохранить xml файл без BOM?
Здравствуйте! Как сохранить xml файл в кодировке UTF-8 без BOM ?

6
Эксперт MS Access
17530 / 7282 / 1662
Регистрация: 21.06.2012
Сообщений: 13,953
14.07.2016, 18:52 2
Ну так убейте "имя файла", если он есть ... .
Visual Basic
1
2
3
        On Error Resume Next
            Kill "имя файла"
        On Error GoTo 0
1
0 / 0 / 0
Регистрация: 17.06.2016
Сообщений: 43
14.07.2016, 18:53  [ТС] 3
О, точно, буду уничтожать. Спасибо.
А без убийства никак?
Что за опции у "filexcel.SaveAs "
0
Эксперт MS Access
7433 / 4568 / 299
Регистрация: 12.08.2011
Сообщений: 14,191
15.07.2016, 02:24 4
Цитата Сообщение от effort Посмотреть сообщение
Что за опции у "filexcel.SaveAs "
Видимо у вас кнопочка на клавиатуре отломалась, вот эта:
Миниатюры
Как сохранить файл эксел перезаписав старый без запроса на сохранение?  
0
0 / 0 / 0
Регистрация: 17.06.2016
Сообщений: 43
15.07.2016, 16:20  [ТС] 5
С кнопкой все хорошо. Поисковик гугл тоже установлен и обновлен.
Тут написано что "Если установлено значение xlLocalSessionChanges, изменения локального пользователя автоматически принимаются."
я надеялся, что автоматически принимаются = не запрашивает на сохранение, а он запрашивает.
0
Эксперт MS Access
26812 / 14491 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
15.07.2016, 16:26 6
effort, перед сохранением отключайте екселевские сообщения
Visual Basic
1
fileobjexcel.DisplayAlerts=False
3
0 / 0 / 0
Регистрация: 17.06.2016
Сообщений: 43
15.07.2016, 16:31  [ТС] 7
Работает, спасибо!
0
15.07.2016, 16:31
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.07.2016, 16:31
Помогаю со студенческими работами здесь

Как сохранить файл из StringGrid без табуляций и переходов
Собственно сабж, каждую ячейку нужно поочередно записать в файл через ; не переходя на следующую...

Выход без запроса на сохранение
Как сделать так, чтобы при закрытии не было запроса на сохранение?

Сохранить вкладку как новый файл без изменений (Excel)
Добрый день! Помогите с макросом, который будет: 1) Удалять все строки в который есть...

Как сохранить текстовый файл в кодировке UTF8 без ВОМ?
Как сохранить текстовый файл просто в UTF8 - понятно: IO.File.WriteAllText(FilePath, Text,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru