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

Вопрос по 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)

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

---

← →
Asdor ©   (2004-03-30 14:45) [7]

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

---

← →
Asdor ©   (2004-03-30 14:46) [8]

А если совместно с ZrenBy ©   (30.03.04 13:55) [4] ?

---

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

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

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

---

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

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



Память: 0.46 MB
Время: 0.033 c