Excel-Dokument ohne Nachfrage speichern

[Grolle]

Hallo,

ich bearbeite eine csv-Datei mit folgendem Code:

Delphi-Quellcode:

      try
        Excel := GetActiveOleObject('Excel.Application');
        shutdown := false;
      except
        Excel := CreateOleObject('Excel.Application');
      end;
        tmp := ChangeFileExt(ExtractFileName(openDialog.Filename),'');
        Excel.Visible := True;
        Excel.Workbooks.Open(opendialog.FileName);
        Excel.Worksheets[tmp].Cells.Select;
        Excel.Selection.NumberFormat := '@';
        Excel.ActiveWorkBook.Save;
        Excel.ActiveWorkBook.Close;
        if shutdown then Excel.Quit;

Leider fragt Excel beim schließen immer, ob die Änderungen an der Datei
gespeichert werden sollen. Kann ich das irgendwie unterdrücken?

Viele Grüße ....

[soulies]

hoi,

ich meine mich daran erinnern zu können das dieser dialog
nicht mehr erscheint wenn du beim speichern einen Filenamen mit angibts.

ungefähr so:

Delphi-Quellcode:

    //Excel.ActiveWorkBook.Save;
    Excel.ActiveWorkBook.SaveAs(Filename) ;

cya

[Grolle]

Hi,

das wars leider nicht. Jetzt kommt noch eine zusätzliche Nachfrage,
ob die existierende Datei ersetzt werden soll.

Viele Grüße ....

//Edit: Leider schmeißt mir der Macro-Recorder auch nicht viel mehr raus

[Bernhard Geyer]

Zitat:

Zitat von Grolle

das wars leider nicht. Jetzt kommt noch eine zusätzliche Nachfrage,
ob die existierende Datei ersetzt werden soll.

Dann lösch halt diese Datei zuvor (Evtl. umbenennen nach Backup-Datei).

[Bbommel]

Zitat:

Zitat von Grolle

Leider fragt Excel beim schließen immer, ob die Änderungen an der Datei
gespeichert werden sollen. Kann ich das irgendwie unterdrücken?

Jepp, kannst du. Eigentlich müsste dir ein

Delphi-Quellcode:

        Excel.ActiveWorkBook.Close(false);

weiterhelfen.

Der Parameter für "Close" ist vom Typ "Boolean" und nennt sich "SaveChanges". Ich habs damit wegbekommen.

Gruß
Bommel

[Reinhardtinho]

Hi,

um alle Meldungen zu unterdrücken, gibts auch folgenden Schalter:

Delphi-Quellcode:

Excel.DisplayAlerts[LCID] := False;

MFG
Lorenz

[Grolle]

Zitat:

Zitat von Bbommel

Jepp, kannst du. Eigentlich müsste dir ein

Delphi-Quellcode:

        Excel.ActiveWorkBook.Close(false);

weiterhelfen.

That's it! Danke für eure Hilfe :thumb:

[drschubi]

Hallo Bbommel,

also ich bekomme eine Zugriffsverletzung, wenn ich

Delphi-Quellcode:

Excel.ActiveWorkBook.Close(false);

direkt benutze.

Muss ich noch etwas beachten? Habe Office 2000 und Delphi 6

Vielen Dank

René

[Chemiker]

Hallo drschubi,

um Dir weiterhelfen zu können müsste man schon etwas mehr Code haben.

Vielleicht hilft Dir dieser Beitrag weiter

Excel schliessen


Bis bald Chemiker

[drschubi]

Hallo Chemiker,

vielen Dank für den Link.

Delphi-Quellcode:

Excel.DisplayAlerts := False;

hat geholfen.

Viele Grüße René