Имя: Пароль:
1C
 
Загрузка в ексель диалоговым окном, при заходе в exl ошибка формата exl что не так
0 ivanius
 
11.04.25
08:19
Написал такой код, сохраняю в диалоговом окне ексель сохраняет я его открываю но пишет неизвестный формат
Но если сохранить указав место вручную всё работает  


Процедура вывод(Команда)
    выводНаСервере();

    
    
    диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
    диалог.Фильтр = "Файл Excel (*.xls)|*.xls|Файл Excel 2007 (*.xlsx)|*.xlsx";
    
    
    ОднаКнига = Новый ПакетОтображаемыхДокументов;
    
    Элт = ОднаКнига.Состав.Добавить();
    Элт.Данные = ПоместитьВоВременноеХранилище(Реквизит1);

    Элт.Наименование = "Спецификации";
    
    Элт = ОднаКнига.Состав.Добавить();
    Элт.Данные = ПоместитьВоВременноеХранилище(Реквизит2);

    Элт.Наименование = "Требуемые";
    
    
    Элт = ОднаКнига.Состав.Добавить();
    Элт.Данные = ПоместитьВоВременноеХранилище(Реквизит3);

    Элт.Наименование = "лист";
    
    
    ОднаКнига.Записать(диалог.ПолноеИмяФайла, ТипФайлаПакетаОтображаемыхДокументов.XLSX);
    
    //ОднаКнига.Записать("C:\олеэааааа.XLSX", ТипФайлаПакетаОтображаемыхДокументов.XLSX);
конецесли     
        
КонецПроцедуры
1 Мультук
 
гуру
11.04.25
08:25
2 Волшебник
 
11.04.25
08:26
Плохие имена реквизитов
3 ivanius
 
11.04.25
08:27
не верный код отправил вот поправил с ЕСЛИ
диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
    диалог.Фильтр = "Файл Excel (*.xls)|*.xls|Файл Excel 2007 (*.xlsx)|*.xlsx";
    
    Если диалог.Выбрать() Тогда
    ОднаКнига = Новый ПакетОтображаемыхДокументов;
    
    Элт = ОднаКнига.Состав.Добавить();
    Элт.Данные = ПоместитьВоВременноеХранилище(Реквизит1);

    Элт.Наименование = "Спецификации";
    
    Элт = ОднаКнига.Состав.Добавить();
    Элт.Данные = ПоместитьВоВременноеХранилище(Реквизит2);

    Элт.Наименование = "Требуемые";
    
    
    Элт = ОднаКнига.Состав.Добавить();
    Элт.Данные = ПоместитьВоВременноеХранилище(Реквизит3);

    Элт.Наименование = "лист";
    
    
    ОднаКнига.Записать(диалог.ПолноеИмяФайла, ТипФайлаПакетаОтображаемыхДокументов.XLSX);
    
    //ОднаКнига.Записать("C:\олеэааааа.XLSX", ТипФайлаПакетаОтображаемыхДокументов.XLSX);
    
    
   конецесли ;
4 Волшебник
 
11.04.25
08:44
(3) плохие имена реквизитов, нет лесенки