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 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 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

        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:
Excel.DisplayAlerts[LCID] := False;
MFG
Lorenz

[Grolle]

Zitat von Bbommel:

Jepp, kannst du. Eigentlich müsste dir ein

        Excel.ActiveWorkBook.Close(false); weiterhelfen.

That's it! Danke für eure Hilfe

[drschubi]

Hallo Bbommel,

also ich bekomme eine Zugriffsverletzung, wenn ich
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.
Excel.DisplayAlerts := False; hat geholfen.

Viele Grüße René