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]

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

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