Выгрузка табличного документа в Excel

ДокЭкс = ПолучитьCOMОбъект("", "Excel.Application");
ДокЭкс.SheetsInNewWorkbook = 1; //Один лист в новой книге
ДокЭкс.DisplayAlerts = 0; //Не выводить предупреждения Excel
тзЧастей="";

тзЧастей=Новый ТаблицаЗначений;
тзЧастей.Колонки.Добавить("Ссылка");
тзЧастей.Колонки.Добавить("ПутьКФайлу");
//создадим список файлов которые нужно свалить в один
для ии=1 по НомерТаблицы цикл
//стр<индекс> - это "ПолеТабличногоДокумента" они формируются динамически их может быть много
ЭлементыФормы["стр"+Строка(ии)].Записать(КаталогВременныхФайлов()+"tmp"+Строка(ии)+".xls",ТипФайлаТабличногоДокумента.XLS);
вр_файл=ДокЭкс.Workbooks.Open(КаталогВременныхФайлов()+"tmp"+Строка(ии)+".xls");
новСтр=тзЧастей.Добавить();
новСтр.Ссылка=вр_файл;
новСтр.ПутьКФайлу=КаталогВременныхФайлов()+"tmp"+Строка(ии)+".xls";
конецЦикла;

Файл = ДокЭкс.Workbooks.Add(); //Создаем файл куда все пишем
Файл.Sheets(1).Name="Удалить"; //Этот лист потом будет лишним ... удалим
Файл.SaveAs(КаталогВременныхФайлов()+"result.xls",-4143);
текЛист=0;
для каждого стрТЗ из тзЧастей цикл
текЛист=текЛист+1;
стрТЗ.Ссылка.Sheets(1).Copy(Файл.Sheets(текЛист));//копирем очередно файл на следующую закладку
// это впринципе ключевой момент .. именно здесь происходит заполнение по закладкам
конецЦикла;
//меняем имна закладок
для ии=1 по ЭлементыФормы.Панель1.Страницы.Количество()-1 цикл
Файл.Sheets(ии).Name = ЭлементыФормы.Панель1.Страницы[ии].Заголовок;
конецЦикла;
//удаляем все лишнее
попытка
Файл.Sheets("Удалить").Delete();
исключение
конецПопытки;

//сохраняем результат
ИмяФайлаВложений=Формат(ТекущаяДата(),"ДФ=ггггММдд")+".xls";
ДиалогОткрытияФайла=Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
ДиалогОткрытияФайла.ПолноеИмяФайла=ИмяФайлаВложений;
ДиалогОткрытияФайла.Каталог=Константы.ПутьTHMS.Получить();
ДиалогОткрытияФайла.Фильтр="Файлы Microsoft Excel (*.xls)|*.xls|Все файлы (*.*)|*.*";
ДиалогОткрытияФайла.МножественныйВыбор=Ложь;
ДиалогОткрытияФайла.Заголовок="Сохранение файла для отправки";
если ДиалогОткрытияФайла.Выбрать() тогда
Файл.SaveAs(ДиалогОткрытияФайла.ПолноеИмяФайла,-4143);
конецЕсли;

ДокЭкс.DisplayAlerts = 1;
ДокЭкс.WorkBooks.Close();
ДокЭкс.Quit();

//удаляем все лишнее
для каждого стрТЗ из тзЧастей цикл
УдалитьФайлы(КаталогВременныхФайлов()+стрТЗ.ПутьКФайлу);
конецЦикла;
УдалитьФайлы(КаталогВременныхФайлов()+"result.xls");

(1) PrinzOfMunchen,

ИмяФайла = Строка(ИмяФайла) + ".xls";
Каталог = КаталогВременныхФайлов();
ПолныйПутьКФайлу = Каталог + ИмяФайла;
Попытка
ТабДокумент.Записать(ПолныйПутьКФайлу,ТипФайлаТабличногоДокумента.XLS);
Сообщить("Записан новый файл " + ПолныйПутьКФайлу);
ЗапуститьПриложение(ПолныйПутьКФайлу);
Исключение
СообщитьОбОшибке(ОписаниеОшибки());
КонецПопытки;

(8) PrinzOfMunchen,

как вариант: по каждому филиалу формировать отчёт и сохранять печатные формы в отдельные файлы

(2) VicGuru, а как в этот самый лист выгрузить наш табдок? Задача вся в этом. Просто не хочется создавать кучу экселевских файлов, через "ТабДок.Записать(...)", а потом их сшивать.

(4) HeadHunter2007, Спасибо за ответ, но там такого нет.

(7) HeadHunter2007, сейчас объясню подробнее суть проблемы. Я делаю внешний отчет. У меня есть свой макет с большим количеством параметров, в который будут выводиться данные по филиалу. Я получаю данные из запроса по нескольким таким филиалам. Данные по каждому филиалу должны быть на новой странице. Если выводить эти данные в табличный документ, то всё просто - после окончания вывода информации о каждом предприятии делать "ТабДок.ВывестиГоризонтальныйРазделительСтраниц();". Но мне нужно, что бы эти данные были выведены в эксель, причём так же - каждый филиал на новой странице. Так вот, допустим, я вывожу данные по одному филиалу в табличный документ("ТабДок"), создаю в моём, заранее созданном файле экселя, новую страницу...а как вывести этот "ТабДок" в эту самую страницу экселя, не представляю.