Нужно записать результет запроса без вывода в таб поле на форме , но при этом записать аналогично в файл ексель.
Как это сделать?

выведи в табличный документ и сохрани в файл

Вывести в табличный документ. Сохранить табличный документ

Приблизательно после


РезультатЗапроса = Запрос.Выполнить();

Что там дальше?

Там примерно похожие буковки

:)

(3) Выборка=Результат.Выбрать();
ТабДок.Вывести(Область);
табДок.Записать(...);

(6) Облать тут какая присваивается?

область

РезультатЗапроса = Запрос.Выполнить().Выгрузить();
ЗначениеВФайл(Имяфайла, РезультатЗапроса);

(7) а как делается вывод в ТабличныйДокумент? Область=Макет.ПолучитьОбласть()

хотя если в эксель, не уверен, что сработает

(9) это как-то не очень эксель ;)

Пасиб...
спробую...

(9) Это я не доконца понял...
Как результат в файл сохранить...

?

(14) не надо тебе (9), выводи в макет

(16)
Созал конструктором общий макет ,и теперь сохраняет...
Тоесть таким методом должен обязательно присутствовать макет ?

(17) Нет

(17) без макета легко обойтись
засунь запрос в построитель запроса
выведи в ТД
ТД сохрани в xls

(19) Как на языке выглядит?

(20) пятница,
какой нафиг код

(17)Ну, можно сразу в ексель писать...

v8: Как преобразовать таблицу значений в документ эксель

4 и 6

Пасиб!

Буду изучать...

если попростому и без изысков...

Попытка
   Эксель=Новый COMобъект("Excel.Application");
   Бук=Эксель.WorkBooks.Open(ФайлТаблицы);
   
   Сообщить("Соединение с Excel ( "+ФайлТаблицы+" )открыто...");
Исключение        
   Сообщить(ОписаниеОшибки());
   Возврат;
КонецПопытки;
Эксель.Visible=0;    
Лист=Бук.Sheets(ТекЛист);
тРез=Запрос.Выполнить().Выгрузить();
НомСтр=0;
Для каждого Стр Из тРез Цикл
   НомСтр=НомСтр+1;
   
   Если НомСтр=1 Тогда
       НомКол=0;
       Для каждого кол из тРез Цикл
           НомКол=Номкол+1;
           Лист.Cells(НомСтр,НомКол).Value=Кол.Имя;
       Иначе
           Лист.Cells(НомСтр,НомКол).Value=Стр[Кол.Имя];
       КонецЕсли;    
       
       
   КонецЕсли;    
   
Конеццикла;    
Эксель.DisplayAlerts=0;
Бук.SaveAs(ИмяФайла);
Бук.Close();

+
поторопился:-)
вот так правильно


Попытка
   Эксель=Новый COMобъект("Excel.Application");
   Бук=Эксель.WorkBooks.Open(ФайлТаблицы);
   
   Сообщить("Соединение с Excel ( "+ФайлТаблицы+" )открыто...");
Исключение        
   Сообщить(ОписаниеОшибки());
   Возврат;
КонецПопытки;
Эксель.Visible=0;    
Лист=Бук.Sheets(ТекЛист);
тРез=Запрос.Выполнить().Выгрузить();
НомСтр=0;
Для каждого Стр Из тРез Цикл
   НомСтр=НомСтр+1;
   
   Если НомСтр=1 Тогда
       НомКол=0;
       Для каждого кол из тРез Цикл
           НомКол=Номкол+1;
           Лист.Cells(НомСтр,НомКол).Value=Кол.Имя;
       КонецЦикла;
   Иначе
       Для каждого кол из тРез Цикл
           НомКол=Номкол+1;
           Лист.Cells(НомСтр,НомКол).Value=Стр[Кол.Имя];
       КонецЦикла;
   КонецЕсли;    
Конеццикла;    
Эксель.DisplayAlerts=0;
Бук.SaveAs(ИмяФайла);
Бук.Close();