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