Вниз
Скачать: CL | DM;

Сохранение данных в Е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.



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

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



Память: 0.45 MB
Время: 0.017 c
14-2287
nikkie
2004-01-12 02:13
2004.02.02
пальчиковые аккумуляторы и зарядные устройства


1-2171
race1
2004-01-18 17:32
2004.02.02
tpaintbox.onpaint


6-2242
Новичек
2003-11-26 16:05
2004.02.02
как в TwebBrowser-е найти все линки на открытой в нем страничке


1-2185
Zheks
2004-01-21 11:09
2004.02.02
округление вверх с количеством знаков после запятой


4-2401
andruxin
2003-11-27 14:51
2004.02.02
TListView. Как сделать элементы разными цветами.




   Наверх