Нашла сама ответ, делает выборку и выгружает данные в эксель.| Код | Процедура Сформировать()
спр=СоздатьОбъект("Справочник.ФизЛица"); если спр.НайтиПоКоду("ТУ000115")=1 тогда Спр.ИспользоватьРодителя(Спр.ТекущийЭлемент());
xl=СоздатьОбъект("Excel.Application"); row=2; //первая строка xl.Workbooks.Add(); //Добавляем новый документ xl.Visible=1; //Делаем его видимым Спр.ВыбратьЭлементы(); Пока спр.ПолучитьЭлемент()=1 цикл
xl.Cells(row,1).Value=спр.код; xl.Cells(row,2).Value=строка(спр.наименование); row=row+1; конеццикла; конецесли; КонецПроцедуры
|
|