Excel - Änderungen im OLEContainer speichern

[FAS]

Hallo

ich habe mir einen OLEContainer in einem Formular eingebaut. Das Laden des Excelfiles klappt, es werden auch fast alle Menüs und Buttens von Excel im Hauptfenster meiner Anwendung angezeigt und das geforderte Dokument wird geöffnet. Das Problem ist jedoch die Änderungen im Excel wieder zu speichern.

Delphi-Quellcode:

 
Type
  ....
  OleContainerExcel: TOleContainer;
  ....

procedure TFrmExcel.OpenDocument(Filename: TFileName);
begin
  OleContainerExcel.CreateObjectFromFile(Filename, False);
  OleContainerExcel.DoVerb(ovShow);
end;

Hierzu fehlt aus Excel dann sowohl das Menü Datei/Speichern als auch der entsprechende Schalter mit dem Diskettensymbol.
Ich bitte um Hilfe.

Gruß Andreas

[uwewo]

Keine Ahnung ob es schon zu spät ist!

Hier die Lösung die ich für Word verwende, sollte aber auch in Excel funktionieren.

Erstelle einen Menüpunkt in Deiner Anwendung "Speichern unter"

Delphi-Quellcode:

 if SaveDialog.Execute then
     OleContainer.OLEObject.SaveAs(SaveDialog.FileName);

[FAS]

Hallo,

danke! Habs zwar unter dessen etwas anders gelöst, läuft aber wohl letztlich auf dasselbe hinaus.

Delphi-Quellcode:

OleContainerExcel.SaveAsDocument(SaveDialogXLS.FileName);

Offen ist jetzt nur noch das Drucken. Leider kennt das OLEObject keine Methode Print.

Gruß Andreas.

[uwewo]

Das habe ich zu diesem Thema gefunden

Delphi-Quellcode:

  OleContainer.OLEObject.Application.Dialogs[xlDialogPrint].Show;
  OleContainer.OLEObject.Application.Dialogs[xlDialogPrintPreview].Show

habe es allerdings nicht getestet.

Wäre nett wenn Du bescheid geben könntest ob es funktioniert.

[FAS]

Danke! :-) Funktioniert.

Gruß Andreas.