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

WorkBooks.Close   Найти похожие ветки 

← →
Yong   (2002-07-29 10:07) [0]

Как узнать октрыта ли уже на компьютере соотвествующая книга Эксель. И если открыта, то закрыть созранить в ней данные и закрыть ее?

---

← →
TTCustomDelphiMaster ©   (2002-07-29 18:16) [1]

implementation
uses Excel2000;

procedure TForm1.Button1Click(Sender: TObject);
var
Ex: TExcelApplication;
i: integer;
begin
Ex := TExcelApplication.Create(self);
Ex.Connect;
for i := 1 to Ex.Workbooks.Count do
if Ex.Workbooks[i].Name = "aaa.xls" then
begin
Ex.Workbooks[i].Save(GetUserDefaultLCID);
Ex.Workbooks[i].Close(EmptyParam, EmptyParam, EmptyParam, GetUserDefaultLCID) ;
break;
end;
Ex.Disconnect;
Ex.Free;
end;

---

← →
Yong   (2002-07-30 08:48) [2]

Спасибо, но что делать если на машине открыто несколько Экселевских процессов?

---

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

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



Память: 0.45 MB
Время: 0.01 c