Товарищи.
Подскажите красивое решение как выгрузить ТЧ документа в файл шаблон excel.
Интересует вопрос добавления новых строк в exel и заполнение полей данными

СоздатьОбъект("Excel.Application"); ?

(1) Далее вариант
Через    
МассивКОМ = Новый COMSafeArray("VT_VARIANT", ВсегоКолонок, ВсегоСтрок);
Не катит.

Подумал просто черещ копирование строк

Через макрос получилось нечто такое

  Range("B5:E5").Select
  Selection.Copy Destination:=Range("B6:E6")
  Range("B6").Select
  ActiveCell.FormulaR1C1 = "123"
  Range("C6").Select
  ActiveCell.FormulaR1C1 = "Иванов"
   Range("D6").Select
   ActiveCell.FormulaR1C1 = "500"
   Range("E6").Select
   ActiveCell.FormulaR1C1 = "24"
   Range("E11").Select


Но может можно как то проще ?

ап

чет не прет тебе с ветками...

http://www.infostart.ru/projects/3060/

правда для 7.7

В итоге вопрос сводится к тому как добавить в икселе строку и заполнить её значениями выборки. Не могу сообразить

(5) Все классно. Мне бы не такое универсальное и для восьмерки

(7) переделай, там делов на 30 минут

(8) Уже начал

Мужики. Ну все практически переписал
Но
Хоть убей не копируется  строка методом

   Для е1 = 2 по ТаблицаРезультата.Количество() Цикл  
       Д = СписокЗагрузки.ЛистШаблона.Rows("" + Смещение + ":" + Смещение);
       Д.Select();
       Д.Copy();
       Д.Insert();
   КонецЦикла;

ВЫваливается с ошибкой метода Range

Произошла исключительная ситуация (Microsoft Office Excel): Метод Select из класса Range завершен неверно

апну чтоли

(8) Дмитрий. Я как понял обработка (5) ваша.
Подскажите плиз с копированием колонок

там есть ошибка маленькая, счас найду свежий файл

(14) Я там уже 2 нашел :-))
Скажите про копирование строки плиз. Как правильно ?

Смещение = СписокПараметровФайла.Получить("СтрокаШаблонТЧ");
   СписокЗагрузки.Получить("ЛистШаблона").Select();    
   Если ТЗ.КоличествоСтрок() = 0 Тогда
       Д = СписокЗагрузки.Получить("ЛистШаблона").Rows("" + Смещение + ":" + Смещение);
       Д.Select();
       Д.Delete();
   Иначе
       Для е1 = 2 по ТЗ.КоличествоСтрок() Цикл  
           Д = СписокЗагрузки.Получить("ЛистШаблона").Rows("" + Смещение + ":" + Смещение);
           Д.Select();
           Д.Copy();
           Д.Insert();
       КонецЦикла;
   КонецЕсли;


обращаю внимание на строку №2


для копирования колонок надо Rows заменить

(16) Спасибо заработало.
Тока физический смысл так и не понял :-(

(17) у тебя в екселевском шаблоне активная страница была другая.

(18) и Select сделал шаблон активным

(19) там еще где-то я чего-то правил, уже не помню, новый файл выложил

Всем спасибо за содействие (vde69 в частности).
Релизована полная аналогия для восьмерки