|
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)Спасибо огроменнейшее. Это именно то, что оказываецца так просто и именно чего мне и не хватало!
Спасиба всем!
Тема закрыта благодаря исчерпывающим ответам.
|
|