Excel XP

← →
Serg (2003-04-30 15:35) [0]

Уважаемые господа!
Следующий код вызывает диалог SaveDialog сохранения файла Excel XP
и сохраняет в заданном пользователе файле активную книгу:

if SaveDialog1.Execute
then ExcelApplication1.ActiveWorkbook.SaveAs(SaveDialog1.FileName,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,xlNoChange,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,LOCALE_USER_DEFAULT);

Однако в процессе компиляции курсор устанавливается после LOCALE_USER_DEFAULT и требует какие-то дополнительные данные. Разве нужны еще какие-то данные? И правилен ли код? Может быть в насторойках ExcelApplication1,что-то неверно?

← →
Smithson (2003-04-30 15:45) [1]

F1 нажми

← →
Serg (2003-04-30 16:54) [2]

F1 уже пробовал. Ничего не понял.

← →
Smithson (2003-04-30 17:41) [3]

Ну тада хоть ошибку опиши...
А лучше - запусти excel, включи запись макросов, сделай сайв аз и посмотри, что там за параметры в макросе перечислены - хотя бы их количество.

← →
Serg (2003-04-30 20:00) [4]

EmptyParam,EmptyParam,EmptyParam,EmptyParam,LOCALE_USER_DEFAULT)|;курсор останавливается там, где верт.черта.

Ошибки:[Error] Unit1.pas(45): Not enough actual parameters
[Error] Unit1.pas(57): Incompatible types: "TExcelWorkbook" and "_Workbook"

Дело в том, что это книжный код из книги Архангельского и написан специально для Excel XP. У меня программа почти готова, и из-за этого кода никак не могу ее закончить. Может быть это действительно защита Excel XP от макросов. Т.К. когда я ввожу код
ExcelApplication1.ActiveWorksheet.Delete(LOCALE_USER_DEFAULT);
он хорошо компилирует, но после запуска прг мне выдает:
Unable to retrieve a pointer to a running object registered with OLE for Excel.Sheet8/и т.д.

Excel XP Найти похожие ветки