Вниз
Скачать: CL | DM;

Работа с MS Excel   Найти похожие ветки 

← →
Mameluke ©   (2004-06-07 14:16) [0]

Доброго времени суток!
Подскажите, пожалуйста, как правильно прописать строку для TExcelApplcation, чтобы создавалась новая книга? Если можно, приведите эту строку (а то открыть существующую книгу могу, а новую создать не получается)


← →
Тимохов ©   (2004-06-07 14:20) [1]

var
fapp: variant;

fApp := CreateOleObject("Excel.Application");
Workbooks.Add


← →
Mameluke ©   (2004-06-07 14:29) [2]

Честно говоря, я уже пробовал:

var
 n: OleVariant;

begin
 n:= "n1.xls";
 ExcelApplication.Workbooks.Add (n,0);
end;

и результат такой же, как и в предложенном Вами варианте. (Add требует параметров, с указав которые, он начинает искать существующую книгу. Может быть, я параметры в скобках неверно указываю?)


← →
Тимохов ©   (2004-06-07 14:40) [3]


> Mameluke ©   (07.06.04 14:29) [2]
> Честно говоря, я уже пробовал:

я вообще без параметров указываю. Позднее связываение, которым пользуетесь и вы, позволяет опускать параметры.
Вам же нужна новая книга?
Если да, то мой вариант это и делает.


← →
Mameluke ©   (2004-06-07 15:18) [4]

Странно... Я и Ваш, и свой вариант пробовал - Delphi ругается: Not enough actual parameters :(


← →
Artem03   (2004-06-07 15:20) [5]

Делай точно, как показано ниже:

MyExcel: Variant;
...
MyExcel:=CreateOLEObject("Excel.Application");
MyExcel.WorkBooks.Add;

За три года - никаких проблем.


← →
Тимохов ©   (2004-06-07 15:29) [6]


> Mameluke ©   (07.06.04 15:18) [4]

ну да, перед workbooks fapp в моем примере надо поставить (думал очевидно).
тогда он в точности получится как пример 5, и все должно работать.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c
14-1086315136
Думкин
2004-06-04 06:12
2004.06.20
С днем рождения!


8-1081271806
Sne
2004-04-06 21:16
2004.06.20
Функции для работы с GIF


14-1085922650
Юрий
2004-05-30 17:10
2004.06.20
Помогите программу дописать!


1-1086254684
TALLA
2004-06-03 13:24
2004.06.20
Переименование NodeName и Attributes в XML?


14-1085639051
Романов Р.В.
2004-05-27 10:24
2004.06.20
Попробуем провести небольшую олимпиаду




   Наверх