Имя: Пароль:
1C
 
OLE Automation. Как можно средствами 1С создать файл Excel
0 GBoris
 
10.10.05
17:07
Подскажите плз. как можна средствами 1С создать файл Excel. Тоесть работать с уже существующем не составляет почти никаких проблем, а вот програмно создать новый!? Жду комментариев. Всем заранее благодарен.
1 ДенисЧ
 
10.10.05
17:11
Workbooks.Add
2 Fargo
 
10.10.05
17:48
Вот пример как выгрузить ТЗ

// Таблицу значений в Excel
//*************************

ТабДокумента= "";

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


ОкноExcel.Caption = "Отчет";
НовыеРабочиеКниги = ОкноExcel.WorkBooks;
РабочаяКнига = НовыеРабочиеКниги.Add();
ЧислоРядов = ТабДокумента.КоличествоСтрок();
ЧислоСтолбцов = ТабДокумента.КоличествоКолонок();


Для Столбец=1 По ЧислоСтолбцов Цикл
   Ячейка = ОкноExcel.Cells(1,Столбец);
   Ячейка.Value = Строка(ТабДокумента.ПолучитьПараметрыКолонки(Столбец,,,,,,,));
КонецЦикла;

Для Ряд=1 По ЧислоРядов Цикл
   Для Столбец=1 По ЧислоСтолбцов Цикл
       Ячейка = ОкноExcel.Cells(Ряд+1,Столбец);
       Ячейка.Value = Строка(ТабДокумента.ПолучитьЗначение(Ряд,Столбец));
   КонецЦикла;
КонецЦикла;

ОкноExcel.Visible=1;

Все остальные действия можно изучить при помощи "Записать Макрос"
3 skunk
 
10.10.05
17:50
(2)можно проще... хелп хорошо написан...
4 Fargo
 
10.10.05
17:54
+(2) ТабДокумента = НужнаяТаблица;
5 raykom
 
10.10.05
17:54
А я по простоте все в коде формирую, а потом вот так:

ИмяФайлаВыгрузки=СокрЛП(ПутьФайлаВыгрузки)+СокрЛП(Число(Док.НомерДок))+".xls";

Ну или любой набор данных в имени.

Таб.Записать(ИмяФайлаВыгрузки,1);
:)
6 skunk
 
10.10.05
18:00
тут про ОЛЮ... а ты все опошлил...
7 GBoris
 
10.10.05
18:13
(2) Тада ещё усложню вопрос: а как тада имя и путь файла прописать, Workbooks.Add(Путь+Имя)?
8 Ковычки
 
10.10.05
18:17
oExcel=CreateObject("Excel.Application");
oExcel.Workbooks.Add;
oExcel.ActiveWorkbook.SaveAs(Путь+Имя);
Но всеравно это неправильно, хоть и результат что надо получишь...
9 GBoris
 
11.10.05
14:04
(8)Спасибо огроменнейшее. Это именно то, что оказываецца так просто и именно чего мне и не хватало!
Спасиба всем!
Тема закрыта благодаря исчерпывающим ответам.