Имя: Пароль:
1C
1C 7.7
v7: Заполнение листа Эксель из 7.7
0 YF
 
27.06.14
09:56
Киньте, плиз, примерчик заполнения листа Эксель из 1с 7.7

С выбором нужного листа и установкой значений полей.

Я уже не помню когда напрямую в Эксель писал. Только читал да и то по АДО.

Ну если не сложно и есть под рукой.
1 Maximysis
 
27.06.14
10:05
есть только на ёкселе

Процедура ВыполнитьСохранение (ИмяВременногоФайла)
    гТаблица.Записать (ИмяВременногоФайла);
    Документ = СоздатьОбъект ("ТабличныйДокумент");
    Документ.Открыть (ИмяВременногоФайла);
    КоличествоСтрок = Документ.ВысотаТаблицы ();

    ИмяЛиста = "Лист ";
    НомерЛиста = 1;
    
    Конвертер = СоздатьОбъект ("КонвертерExcel");
    Книга = Конвертер.Создать ();
    Начало = 1;
    Пока КоличествоСтрок > 0 Цикл
       Документ = СоздатьОбъект ("ТабличныйДокумент");
       Документ.Открыть (ИмяВременногоФайла);
       Если Начало = 0 Тогда
           Документ.УдалитьСтроки (1, 65536);
           Документ.Записать (ИмяВременногоФайла);
       Иначе
            Начало = 0;
       КонецЕсли;
      
       Книга.Листы.Добавить (ИмяЛиста + НомерЛиста, Документ);
       КоличествоСтрокВДокументе = Документ.ВысотаТаблицы ();
       ЗаписаноСтрок = Мин (65536, КоличествоСтрокВДокументе);
       КоличествоСтрок = КоличествоСтрок - Мин (КоличествоСтрок, ЗаписаноСтрок); // на всякий случай
       НомерЛиста = НомерЛиста + 1;
    КонецЦикла;
    
    Книга.ПараметрыКонвертера.РаспознаватьЧисловыеЗначения = 1;
    
    Если ПробелВТриадах=0 Тогда
        Книга.ПараметрыКонвертера.ЧисловыеРазделители = ",.";
    КонецЕсли;    

    Книга.Записать (глПрофильПользователя+"\Desktop\"+СокрЛП(ВыбИмяФайла)+".xls");
КонецПроцедуры //ВыполнитьСохранение(ИмяВременногоФайла)
2 YF
 
27.06.14
10:07
(1) Не, на Ёкселе не надо
3 YF
 
27.06.14
10:07
пасиба
4 Lazy Stranger
 
27.06.14
10:20
(0) послал в почту пример прайса, который в шаблон прайс с группировками записывает
5 YF
 
27.06.14
10:27
(4) пасиба