Сохранение данных в ЕXCEL

← →
SGU_ (2004-01-22 07:05) [0]

Мастера подскажите как сохранить измененный Книгу EXCEL-я,
не выводя никаких диалоговых запросов. Например в данном случае выводиться запрос о замене файла.

XL:=CreateOleObject("Excel.Application");
Xl.WorkBooks.Add(fname);
Xl.ActiveSheet.Cells[1,3].Value:="ПОКАЗАТЕЛИ КАЧЕСТВА";
xl.ActiveWorkBook.saveas(fname);

← →
Тимохов © (2004-01-22 09:45) [1]

Что нибудь из этого
XL.Interactive := False;
XL.DisplayAlerts := False;
Из своего проекта взял - не помню, что из этих двух пропертей надо устанавливать.

← →
malamba (2004-01-22 10:08) [2]

Я пользуюсь сервером Excel ( вкладка Server)
НА форме размещены ExcelApplication
ExcelWorkBook

Закрываю так

sFileName:= ...;
sFileName:=sDirName + "\" + sFileName;
If FileExists(sFileName)=True Then DeleteFile(sFileName);

FormGlav.ExcelWorkbook.SaveAs(sFileName,xlNormal,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,
xlNoChange,EmptyParam,EmptyParam,EmptyParam,EmptyParam,0);

//AccessMode: TOleEnum type TOleEnum = type LongWord;
//Can be one of thefollowing XlSaveAsAccessMode constants:
// xlShared (shared list),
// xlExclusive (exclusive mode),
// or xlNoChange (don’t change the access mode). If this argument is omitted,
// the access mode isn’t changed.
//This argument is ignored if you save a shared list without changing the
//file name.

Сохранение данных в ЕXCEL Найти похожие ветки