Ist Excel schon gestartet? Wie Excel offen lassen?

[soulies]

hoi,

versuch mal folgendes für - läuft Excel bereits ?

Delphi-Quellcode:

var
  excel  :  OleVariant ;
begin
  try
     excel := GetActiveOleObject('Excel.Application');
     ShowMessage('excel läuft');
     ...
     excel := Unassigned ;
  except
     excel := CreateOleObject('Excel.Application');
     ShowMessage('excel wurde gestartet');
     ...
     excel := Unassigned ;
  end;

damit sollte sich was anfangen lassen ...


cya