Имя: Пароль:
1C
 
Выгрузка в Excel
0 Sh_Vlad
 
11.11.10
15:36
Как сделать, чтобы сохраненный файл был формата 2003, если он создан 2007-м
1 Sh_Vlad
 
15.11.10
14:30
Вопрос открыт...
2 Маленький Вопросик
 
15.11.10
14:33
да там в настройках экселя есть - сохранять в 97-2003 форматах...
3 Sh_Vlad
 
15.11.10
14:36
(2) Создан и сохраняется программно в 8-ке
4 Sh_Vlad
 
15.11.10
14:40
Ексель=Новый COMОбъект("Excel.Application");
.......

Ексель.ActiveWorkBook.SaveAs(ИмяФайла);

нужен формат 2003
5 Grusswelle
 
15.11.10
14:43
(4) Уверен, что метод .SaveAs() имеет не один, а больше параметров.
6 Sh_Vlad
 
16.11.10
08:58
По макросу определил формат - 43, должен быть вторым параметром. Не сохраняет...
7 smaharbA
 
16.11.10
09:02
сохроняет
8 Sh_Vlad
 
16.11.10
09:04
Ексель.ActiveWorkBook.SaveAs(ИмяФайла,43);

через попытку - не сохрАняет!!!
9 Sh_Vlad
 
16.11.10
09:05
Можно параметр задать до вызова метода?
10 smaharbA
 
16.11.10
09:06
может код сперва
11 Смешной 1С
 
16.11.10
09:11
Не уверен, но а если имя файла задать с расширением xls

price.xls
12 Sh_Vlad
 
16.11.10
09:18
Имя .xls
Без параметра сохраняет тем Ёкселем, который на машине - был третий, не было проблем, сейчас 7, а файл нужен для дальнейшей работы..

Описание метода в Excel:
SaveAs([Filename], [FileFormat], [Password], [WriteResPassword], [ReadOnlyRecommended], [CreateBackup], [AccessMode As XlSaveAsAccessMode = xlNoChange], [ConflictResolution], [AddToMru], [TextCodepage], [TextVisualLayout], [Local])
13 smaharbA
 
16.11.10
09:20
дисаблеалерт=истина
савеас
дисаблеалерт=ложь
14 Sh_Vlad
 
16.11.10
09:23
(13) Отключить предупреждения?
Что даст? не будет говорить что несохранен?
15 Sh_Vlad
 
16.11.10
09:32
(13) Проделал - ничего...
16 Sh_Vlad
 
16.11.10
09:50
Есть ще предложения?
17 PaulBC
 
16.11.10
10:09
Работает все. Только у меня офис 2010 и филеформат = 56
18 smaharbA
 
16.11.10
10:32

Истина=-1;
Ложь=0;
Ексель=СоздатьОбъект("excel.application");
Книги=Ексель.Workbooks;
Книга=Книги.Add();
Ексель.DisplayAlerts=Ложь;
Книга.SaveAs("c:\\книга.xlsx");
Книга.Close();
Книга=Книги.Open("c:\\книга.xlsx");
Книга.SaveAs("c:\\книга.xls",-4143);
Ексель.DisplayAlerts=Истина;
Книга.Close()
Ексель.Quit();
19 бомболюк
 
16.11.10
10:45
у меня с 56 работало
20 Sh_Vlad
 
16.11.10
11:10
Спасибо всем. Все дело в параметре - сработал (-4143).
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан