Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Заменить расширение по умолчанию "Сохранить как" - Мир MS Excel

Старая форма входа
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: китин, _Boroda_  
Заменить расширение по умолчанию "Сохранить как"
Assa Дата: Понедельник, 05.12.2016, 15:12 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день!

Ситуация: необходимо при нажатии на "Сохранить как" в появившемся диалоге сохранения заменить дефолтный тип файла на *.XLS. Если ли возможность произвести такую замену макросом?

Т.е. по логике мне нужно изменить FileFormat как в примере ниже, но SaveAs вызывать не из макроса, а обрабатывать "Сохранить как", который нажимает пользователь.
[vba]
Код

ActiveWorkbook.SaveAs Filename:=myFileName, FileFormat:= xlOpenXMLWorkbook
[/vba]
 
Ответить
СообщениеДобрый день!

Ситуация: необходимо при нажатии на "Сохранить как" в появившемся диалоге сохранения заменить дефолтный тип файла на *.XLS. Если ли возможность произвести такую замену макросом?

Т.е. по логике мне нужно изменить FileFormat как в примере ниже, но SaveAs вызывать не из макроса, а обрабатывать "Сохранить как", который нажимает пользователь.
[vba]
Код

ActiveWorkbook.SaveAs Filename:=myFileName, FileFormat:= xlOpenXMLWorkbook
[/vba]

Автор - Assa
Дата добавления - 05.12.2016 в 15:12
Pelena Дата: Понедельник, 05.12.2016, 15:21 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19401
Репутация: 4549 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
Макрорекодер записал так
[vba]
Код
Application.DefaultSaveFormat = xlExcel8
[/vba]


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Макрорекодер записал так
[vba]
Код
Application.DefaultSaveFormat = xlExcel8
[/vba]

Автор - Pelena
Дата добавления - 05.12.2016 в 15:21
Assa Дата: Понедельник, 05.12.2016, 15:29 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Pelena, к сожалению, таким способом замена не производится
 
Ответить
СообщениеPelena, к сожалению, таким способом замена не производится

Автор - Assa
Дата добавления - 05.12.2016 в 15:29
Assa Дата: Понедельник, 05.12.2016, 15:35 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Т.е. суть задачи в чем: мне нужно сохранить файл на рабочий стол, который выгружен из некой системы X. Это файл был загружен в саму систему X с расширением .XLS, но почему выгрузка файла из системы происходит нестабильно, и в один прекрасный момент дефолтное расширение файла меняется на .XLSX. В связи с этим, при попытке сохранения появляется информационное окно "Следующие компоненты невозможно сохранить в книге без поддержки макросов", поскольку тип .XLSX не поддерживает макросы. Именно поэтому мне нужно вернуть расширение .XLS обратно, чтобы сохранение проходило гладко.
 
Ответить
СообщениеТ.е. суть задачи в чем: мне нужно сохранить файл на рабочий стол, который выгружен из некой системы X. Это файл был загружен в саму систему X с расширением .XLS, но почему выгрузка файла из системы происходит нестабильно, и в один прекрасный момент дефолтное расширение файла меняется на .XLSX. В связи с этим, при попытке сохранения появляется информационное окно "Следующие компоненты невозможно сохранить в книге без поддержки макросов", поскольку тип .XLSX не поддерживает макросы. Именно поэтому мне нужно вернуть расширение .XLS обратно, чтобы сохранение проходило гладко.

Автор - Assa
Дата добавления - 05.12.2016 в 15:35
Assa Дата: Понедельник, 05.12.2016, 15:37 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Может есть возможность отключить вывод такого информационного окна? DisplayAlert не подходит, поскольку это не предупреждение, а именно информационное сообщение.
 
Ответить
СообщениеМожет есть возможность отключить вывод такого информационного окна? DisplayAlert не подходит, поскольку это не предупреждение, а именно информационное сообщение.

Автор - Assa
Дата добавления - 05.12.2016 в 15:37
Pelena Дата: Понедельник, 05.12.2016, 15:43 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 19401
Репутация: 4549 ±
Замечаний: ±

Excel 365 & Mac Excel
обрабатывать "Сохранить как", который нажимает пользователь

Этот параметр устанавливается в Параметрах Excel -- Сохранение -- Сохранять файлы в следующем формате.

Либо сохранять в формате .xlsm (с поддержкой макросов)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
обрабатывать "Сохранить как", который нажимает пользователь

Этот параметр устанавливается в Параметрах Excel -- Сохранение -- Сохранять файлы в следующем формате.

Либо сохранять в формате .xlsm (с поддержкой макросов)

Автор - Pelena
Дата добавления - 05.12.2016 в 15:43
Assa Дата: Понедельник, 05.12.2016, 15:48 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Pelena, да, но в том то и беда, что при попытке повторного сохранения, происходит баг в системе X, из которой выгружается файл. И когда пользователь нажимает Сохранить как, вместо xls, подтягивается xlsx. Исправить баг в системе X не получилось. Решила попробовать подойти со стороны Excel.
 
Ответить
СообщениеPelena, да, но в том то и беда, что при попытке повторного сохранения, происходит баг в системе X, из которой выгружается файл. И когда пользователь нажимает Сохранить как, вместо xls, подтягивается xlsx. Исправить баг в системе X не получилось. Решила попробовать подойти со стороны Excel.

Автор - Assa
Дата добавления - 05.12.2016 в 15:48
Kuzmich Дата: Понедельник, 05.12.2016, 15:59 | Сообщение № 8
Группа: Проверенные
Ранг: Ветеран
Сообщений: 713
Репутация: 157 ±
Замечаний: 0% ±

Excel 2003
Попробуйте так, сохранить как Книга Microsoft Excel 97-2003
[vba]
Код

    ActiveWorkbook.SaveAs Filename:="D:\Пример1.xls", FileFormat:=xlExcel9795, _
        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
[/vba]
 
Ответить
СообщениеПопробуйте так, сохранить как Книга Microsoft Excel 97-2003
[vba]
Код

    ActiveWorkbook.SaveAs Filename:="D:\Пример1.xls", FileFormat:=xlExcel9795, _
        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
[/vba]

Автор - Kuzmich
Дата добавления - 05.12.2016 в 15:59
Assa Дата: Понедельник, 05.12.2016, 16:21 | Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Kuzmich, мне не подходит такой вариант. Мне нужно не из VBA сохранять файл, а обрабатывать действие пользователя "Сохранить как", в это и беда :(
 
Ответить
СообщениеKuzmich, мне не подходит такой вариант. Мне нужно не из VBA сохранять файл, а обрабатывать действие пользователя "Сохранить как", в это и беда :(

Автор - Assa
Дата добавления - 05.12.2016 в 16:21
Kuzmich Дата: Понедельник, 05.12.2016, 16:57 | Сообщение № 10
Группа: Проверенные
Ранг: Ветеран
Сообщений: 713
Репутация: 157 ±
Замечаний: 0% ±

Excel 2003
Цитата
обрабатывать действие пользователя "Сохранить как", в это и беда

Может я чего-то не понимаю?
При Сохранить как выбираете тип файла: как Книга Microsoft Excel 97-2003,
это и будет .xls
 
Ответить
Сообщение
Цитата
обрабатывать действие пользователя "Сохранить как", в это и беда

Может я чего-то не понимаю?
При Сохранить как выбираете тип файла: как Книга Microsoft Excel 97-2003,
это и будет .xls

Автор - Kuzmich
Дата добавления - 05.12.2016 в 16:57
Assa Дата: Понедельник, 05.12.2016, 17:40 | Сообщение № 11
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Kuzmich, попробую объяснить по другому.

У меня есть excel файл (например Декларация.xls) и мне как ответственному лицу необходимо загрузить его в систему X, чтобы бухгалтера могли с ним работать. Я беру файл Декларация.xls и загружаю в эту самую систему X.

Теперь объясню, что делают бухгалтера. Например, им нужно сформировать налоговую декларацию. Они логинятся с системе X, запускают некий отчет по налоговой декларации, который использует мой файл Декларация.xls. Отчет сформировался, бухгалтер получил заполненный файл и хочет его сохранить у себя на рабочем столе. Он нажимает Файл -> Сохранить как. Вот в этот момент мне нужно, чтобы в поле Тип файла, был тип *.xls. Чтобы бухгалтеру не нужно было выбирать тип файла из списка.

Вот в чем беда системы X: Если бухгалтер формирует декларацию первый раз, то расширение файла подтягивается верно, но если пользователь не закрыв отчет ещё раз нажмет на Файл->Сохранить как, то в поле Тип файла подтягивается не *.xls, а *.xlsx. Это у системы X такой баг. Со стороны системы этот баг устранить не удалось, именно поэтому я и пытаюсь решить проблему со стороны Excel.

Зачем мне это нужно: потому что бухгалтера, да и многие другие пользователи достаточно ленивы, чтобы выбирать там что-то из списка и нажимать лишние кнопки. Боюсь, что некоторые из пользователей даже не ведают, что такое расширение файла. Нужна любая рабочая идея. Тот код, который вы предложили не изменит тип файла в вызываемом диалоговом окне, а откроет дополнительный диалог. Таким образом их будет аж 2: первый вызванный из VBA, а второй стандартный excel-й.


Сообщение отредактировал Assa - Понедельник, 05.12.2016, 17:44
 
Ответить
СообщениеKuzmich, попробую объяснить по другому.

У меня есть excel файл (например Декларация.xls) и мне как ответственному лицу необходимо загрузить его в систему X, чтобы бухгалтера могли с ним работать. Я беру файл Декларация.xls и загружаю в эту самую систему X.

Теперь объясню, что делают бухгалтера. Например, им нужно сформировать налоговую декларацию. Они логинятся с системе X, запускают некий отчет по налоговой декларации, который использует мой файл Декларация.xls. Отчет сформировался, бухгалтер получил заполненный файл и хочет его сохранить у себя на рабочем столе. Он нажимает Файл -> Сохранить как. Вот в этот момент мне нужно, чтобы в поле Тип файла, был тип *.xls. Чтобы бухгалтеру не нужно было выбирать тип файла из списка.

Вот в чем беда системы X: Если бухгалтер формирует декларацию первый раз, то расширение файла подтягивается верно, но если пользователь не закрыв отчет ещё раз нажмет на Файл->Сохранить как, то в поле Тип файла подтягивается не *.xls, а *.xlsx. Это у системы X такой баг. Со стороны системы этот баг устранить не удалось, именно поэтому я и пытаюсь решить проблему со стороны Excel.

Зачем мне это нужно: потому что бухгалтера, да и многие другие пользователи достаточно ленивы, чтобы выбирать там что-то из списка и нажимать лишние кнопки. Боюсь, что некоторые из пользователей даже не ведают, что такое расширение файла. Нужна любая рабочая идея. Тот код, который вы предложили не изменит тип файла в вызываемом диалоговом окне, а откроет дополнительный диалог. Таким образом их будет аж 2: первый вызванный из VBA, а второй стандартный excel-й.

Автор - Assa
Дата добавления - 05.12.2016 в 17:40
Pelena Дата: Понедельник, 05.12.2016, 17:49 | Сообщение № 12
Группа: Админы
Ранг: Местный житель
Сообщений: 19401
Репутация: 4549 ±
Замечаний: ±

Excel 365 & Mac Excel
У бухгалтеров на компьютерах надо выполнить
в Параметрах Excel -- Сохранение -- Сохранять файлы в следующем формате -- Книга Microsoft Excel 97-2003


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеУ бухгалтеров на компьютерах надо выполнить
в Параметрах Excel -- Сохранение -- Сохранять файлы в следующем формате -- Книга Microsoft Excel 97-2003

Автор - Pelena
Дата добавления - 05.12.2016 в 17:49
Assa Дата: Понедельник, 05.12.2016, 17:52 | Сообщение № 13
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Pelena, это не решает проблему. При попытке повторного сохранение происходит баг системы X и подтягивается тип файла "*.xlsx"
 
Ответить
СообщениеPelena, это не решает проблему. При попытке повторного сохранение происходит баг системы X и подтягивается тип файла "*.xlsx"

Автор - Assa
Дата добавления - 05.12.2016 в 17:52
Assa Дата: Понедельник, 05.12.2016, 17:54 | Сообщение № 14
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Pelena, как бы это сказать. Когда бухгалтер формирует файл он выглядит не как обычная книга Excel, а как книга Excel интегрированная в систему X. То есть Excel как бы интегрирован в систему


Сообщение отредактировал Assa - Понедельник, 05.12.2016, 17:55
 
Ответить
СообщениеPelena, как бы это сказать. Когда бухгалтер формирует файл он выглядит не как обычная книга Excel, а как книга Excel интегрированная в систему X. То есть Excel как бы интегрирован в систему

Автор - Assa
Дата добавления - 05.12.2016 в 17:54
Kuzmich Дата: Понедельник, 05.12.2016, 17:55 | Сообщение № 15
Группа: Проверенные
Ранг: Ветеран
Сообщений: 713
Репутация: 157 ±
Замечаний: 0% ±

Excel 2003
Видимо у вас в системе установлен Microsoft Office версии 2007 или выше.
Поэтому при сохранении он и подставляет расширение .xlsx
А вы пытаетесь сохранить его в формате Excel 2003. Но в этом формате могут быть
потеряны какие-то функции, присущие более новым версиям офиса.
На своей работе я стараюсь все делать в одной версии Excel 2003
 
Ответить
СообщениеВидимо у вас в системе установлен Microsoft Office версии 2007 или выше.
Поэтому при сохранении он и подставляет расширение .xlsx
А вы пытаетесь сохранить его в формате Excel 2003. Но в этом формате могут быть
потеряны какие-то функции, присущие более новым версиям офиса.
На своей работе я стараюсь все делать в одной версии Excel 2003

Автор - Kuzmich
Дата добавления - 05.12.2016 в 17:55
Assa Дата: Понедельник, 05.12.2016, 17:57 | Сообщение № 16
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Kuzmich, интересная идея. К сожалению, смогу её проверить только вечером на домашнем компьютере.
 
Ответить
СообщениеKuzmich, интересная идея. К сожалению, смогу её проверить только вечером на домашнем компьютере.

Автор - Assa
Дата добавления - 05.12.2016 в 17:57
Udik Дата: Понедельник, 05.12.2016, 18:03 | Сообщение № 17
Группа: Друзья
Ранг: Старожил
Сообщений: 1588
Репутация: 192 ±
Замечаний: 0% ±

Excel 2016 х 64
Возможно такое прокатит, в модуле книги
[vba]
Код

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DefaultSaveFormat = xlExcel8
End Sub

[/vba]


вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com
 
Ответить
СообщениеВозможно такое прокатит, в модуле книги
[vba]
Код

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DefaultSaveFormat = xlExcel8
End Sub

[/vba]

Автор - Udik
Дата добавления - 05.12.2016 в 18:03
Assa Дата: Понедельник, 05.12.2016, 18:14 | Сообщение № 18
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Udik, к сожалению не работает
 
Ответить
СообщениеUdik, к сожалению не работает

Автор - Assa
Дата добавления - 05.12.2016 в 18:14
Assa Дата: Понедельник, 05.12.2016, 18:16 | Сообщение № 19
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Сейчас попробую изобразить, как это выглядит
 
Ответить
СообщениеСейчас попробую изобразить, как это выглядит

Автор - Assa
Дата добавления - 05.12.2016 в 18:16
Assa Дата: Понедельник, 05.12.2016, 18:20 | Сообщение № 20
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
My WebPage

Вот так выглядит Excel файл встроенный в систему X. То есть именно то, что видит бухгалтер.


Сообщение отредактировал Assa - Понедельник, 05.12.2016, 18:24
 
Ответить
СообщениеMy WebPage

Вот так выглядит Excel файл встроенный в систему X. То есть именно то, что видит бухгалтер.

Автор - Assa
Дата добавления - 05.12.2016 в 18:20
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!