Как создать файл Exel

← →
Lixodei © (2006-12-28 14:30) [0]

Скажите плиз, как создать файл Exel, например, на диске C:\Test.xls
пишу так:
ExcelApp := CreateOleObject("Excel.Application");
ExcelApp.application.enableevents:= false;
ExcelApp.visible:=false;
ExcelApp.WorkBooks.Add(xlWBatWorkSheet);
ExcelApp.WorkBooks[1].WorkSheets[1].name := "Данные";
{заношу данные в exel}

??? а как сохранить не знаю
Спасибо

← →
alex_*** © (2006-12-28 14:45) [1]

у книги есть метод Save. Открой в excel окно редактирования макросов и посмотри что у него есть

← →
Lixodei © (2006-12-28 14:57) [2]

Я понимаю, что у нее есть метод Save. Но вопрос в другом. Когда я проделываю действия, то файл уже создан в какой-то директории и я его лишь изменяю.
Вот что вывод макрос при команде Сохранить как
ActiveWorkbook.SaveAs Filename:="D:\12.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
А как это в delphi? И можно ли использовать этот метод если я создаю объект exel как написано мной выше?

← →
EvS © (2006-12-28 15:47) [3]

ActiveWorkbook.SaveAs(FileName);

← →
AlexanderMS © (2006-12-28 15:49) [4]

> Lixodei © (28.12.06 14:57) [2]
> А как это в delphi?

Можно набрать:
ActiveWorkbook.SaveAs(
и высветится подсказочка (если настройки не изменены). И всё станет ясно.
К примеру, ReadOnlyRecommended - название параметра, False - значение.

← →
palva © (2006-12-28 15:50) [5]

А как это в delphi?
В делфи нужно передавать эти же параметры но в позиционном виде. Для этого нужно посмотреть порядок оператов в методе SaveAs. Это в среде разработки Basic (Alt-F11) нужно выйти на Object Viewer (по-моему F2), найти нужный объект и метод и выписать последовательность параметров. Также нужно посмотреть значение константы xlNormal.
Альтернативный путь посмотреть параметры - это в среде разработки Delphi импортировать библиотеку типов из Excel, а затем посмотреть в получившемся файле ..._tlb.pas
Теперь можно написать обращение к функции на делфи. Пропущенные бейсиковские параметры задавать вариантной константой Unassigned

> и высветится подсказочка (если настройки не изменены).
Я понял так, что он не использует стандартную офисную компоненту, а создает олеобъет непосредственно.

ExcelApp.WorkBooks[1].SaveAs(Filename:="D:\12.xls");

Если хотите использовать именованные константы типа xlNormal, то надо в uses добавить модуль ExcelXX (ХХ - обозначение версии оффиса)

Как создать файл Exel Найти похожие ветки