|
Как пересохранить из нового Excel в старый Excel ? | ☑ | ||
|---|---|---|---|---|
|
0
Koliaff
20.05.13
✎
12:52
|
Есть файл с расширением *.xlsx
Надо пересохранить его в формат 97-2003 средствами 1С. Пробую так : Excel = Новый COMОбъект("Excel.Application"); Книга = Excel.WorkBooks.Open(ИмяФайла+"x"); Книга.SaveAs(ИмяФайла); Excel.Quit(); Excel = Неопределено; Но так не правильно, он сохраняет в новом формате, с расширением XLS. А мне надо кроме изменения расширения, чтобы сам формат файла поменялся. Как это сделвть ? |
|||
|
1
Барбариска
20.05.13
✎
12:55
|
Книга.SaveAs(ИмяФайла,-4143);
так попробуй ) |
|||
|
2
Koliaff
20.05.13
✎
13:00
|
1С засисла ) после -4143
Что это за волшебные цифры ? |
|||
|
3
Koliaff
20.05.13
✎
13:02
|
Там сообщение выдается что сохраняемый файл не совместим с Excel 97. Как программно нажать кнопку "продолжить" в окне сообщений Excel ?
|
|||
|
4
Барбариска
20.05.13
✎
13:04
|
Зависло - на предупреждении?
Может просто предупреждения отключить? Цифры -4143 = значение екселевской константы |
|||
|
5
Лодырь
20.05.13
✎
13:04
|
Если Число(Excel.version) < 12 Тогда
// Excel это ComОбъект("Excel.application") FileFormatNum = -4143 // ага, загадочное число Иначе FileFormatNum = 56 // ну что мешало сделать форматы стандартными? КонецЕсли; |
|||
|
6
Барбариска
20.05.13
✎
13:06
|
Выключить предупреждения так:
Excel.DisplayAlerts = 0 и потом не забыть на место вернуть) |
|||
|
7
Koliaff
20.05.13
✎
13:12
|
БОЛЬШОЕ СПАСИБО ! Вопрос закрыт.
|
|||
|
8
Барбариска
20.05.13
✎
13:13
|
(5) -4143 в новых версиях тоже работает.
и проблема "сохраняемый файл не совместим с Excel 97" может быть и с -4143 и с 56 |
|||
|
9
Лодырь
20.05.13
✎
13:20
|
(8) Как показывает практика - не всегда работает ) Иначе бы не городил подобную конструкцию.
|
|||
|
10
Барбариска
20.05.13
✎
13:22
|
(9) ну.. буду знать ) спасибо ))
|
| Форум | Правила | Описание | Секции | Поиск |