Excel starten geht/geht nicht

**ml2**

Hallo,

ich hänge fest. Habe Delph5 Professional und Excel starten funktioniert eigentlich mit folgendem Code über ein Form mit Button problemlos.

In dem Programm, wo ich es nutzen will, gibt es allerdings die Fehlermeldung "Variante referenziert kein Automatisierungsobjekt" bei CreateOLEObject.

Hat jemand einen Tip woran geht/geht nicht liegen könnte? Projekt-/compiler- und Linkereinstellungen scheinen identisch zu sein.

Markus

markieren

Code:

			function EXCELStarten (var my_EXCEL : OLEVariant): boolean;

{erfordert in uses: comobj}

begin

   try

    my_EXCEL := CreateOLEObject('Excel.Application');

    Result := TRUE;

  except

    ShowMessage('Excel konnte nicht gestartet werden!');

    Result := FALSE;

    Exit

  end;

end;

procedure TForm1.Button1Click(Sender: TObject);

var Excel : OLEVariant;

begin

  EXCELStarten(Excel);   // muß wg OLE-Object auf jeden Fall (evtl. zusätzlich) gestartet werdem

  Excel.Visible := TRUE;           

end;

Excel starten geht/geht nicht

Excel starten geht/geht nicht

Forumregeln