Вопрос по Excel

← →
Фикус © (2004-03-30 12:45) [0]

Сохраняю документ так:
Workbook.SaveAs(GetCurrentDir+"\report\list.xls",EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,xlExclusiv e,EmptyParam,EmptyParam,EmptyParam,EmptyParam,xlLCID);
Как перезаписать файл без запроса, если он уже существует?

← →
Goida © (2004-03-30 13:01) [1]

ExcelApp.EnableEvents := FALSE;

← →
sVic (2004-03-30 13:11) [2]

v:=GetCurrentDir+"\report\list.xls";
if FileExists(v) then DeleteFile(v);

← →
Фикус © (2004-03-30 13:17) [3]

[1] Goida © (30.03.04 13:01)

Не работает.

← →
ZrenBy © (2004-03-30 13:55) [4]

.DisplayAlerts := False ?

← →
Asdor © (2004-03-30 14:28) [5]

procedure SaveAs(Filename: OleVariant;
FileFormat: OleVariant;
Password: OleVariant;
WriteResPassword: OleVariant;
ReadOnlyRecommended: OleVariant;
CreateBackup: OleVariant;
AccessMode: XlSaveAsAccessMode;
ConflictResolution: OleVariant; :=xlLocalSessionChanges
AddToMru: OleVariant;
TextCodepage: OleVariant;
TextVisualLayout: OleVariant;
Local: OleVariant;
lcid: Integer);
По-моему так...

← →
Фикус © (2004-03-30 14:35) [6]

[5] Asdor © (30.03.04 14:28)

Нет, не работает.

А что пишет-то?

А вот [4] проходит. Только правильнее: .DisplayAlerts[xlLCID]:=False;

Спасибо всем откликнувшимся :)

Вопрос по Excel Найти похожие ветки