Как корректно открыть Excel, взять оттуда значение ячейки и ...

← →
Weare (2004-09-13 12:17) [0]

День добрый, уважаемые мастера. Подскажите плиз.
Как корректно открыть файл Excel"я (передать в него пароль), взять оттуда значение ячейки и закрыть его. Я тут пробую, но у меня не получается пароль передать, и после закрытия программы остается зависший процесс

← →
3APA3A © (2004-09-13 12:56) [1]

Вот описание этой процедуры

WorkBooks.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad, OpenConflictDocument);

А работает это так.
program CoolProgram;
uses ComObj;
var Excel : OLEVariant;
begin
Excel := ComObj.CreateOleObject("Excel.Application");
Excel.WorkBooks.Open("c:\1.xls", EmptyParam, EmptyParam, EmptyParam, "MyHyperPassword", EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
ShowMessage(Excel.ActiveWorkBook.Sheets[1].Cells[1, 1]);
Excel.Quit;
Excel := Null;
end.

← →
Rule © (2004-09-13 14:10) [2]

http://www.kornjakov.ru/stat.htm
вот ещё для общего развития и углубленного изучения данной темы

← →
Weare (2004-09-13 14:15) [3]

Спасибо, попробовал.
Ругается на строчку:

> Excel.WorkBooks.Open("c:\1.xls", EmptyParam, EmptyParam,
> EmptyParam, "MyHyperPassword", EmptyParam, EmptyParam, EmptyParam,
> EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
> EmptyParam, EmptyParam);

- Недопустимое число параметров
Чего это ОНО?

← →
Rule © (2004-09-13 15:15) [4]

Это оно ругается на то что надо убрать один EmptyParam

← →
Weare (2004-09-13 18:07) [5]

>to Rule © (13.09.04 15:15) [4]

спасибо, я вообще убрал все параметры после пароля - ВСЕ РАБОТАЕТ!

Weare (13.09.04 18:07) [5]
Так у вас батенька дальнее связываение, а тут предполагалось ближнее ...

← →
Weare (2004-09-14 11:07) [7]

> Rule © (14.09.04 08:57) [6]
> Weare (13.09.04 18:07) [5]
> Так у вас батенька дальнее связываение, а тут предполагалось
> ближнее ...

Извини, за такие вопросы, но что ты имел ввиду?

Как корректно открыть Excel, взять оттуда значение ячейки и ... Найти похожие ветки