Einzelnen Beitrag anzeigen

ferby

Registriert seit: 15. Aug 2004
Ort: Wien
841 Beiträge
 
Delphi 2010 Enterprise
 
#1

Excel Dokument speichern ohne Sicherheitsabfrage

  Alt 20. Mär 2007, 16:35
Hallo,

Ich möchte mein Excel dokument Speichern, ohne das ich eine Abfrage bekomme, ob ich die bestehende Datei wirklich überspeichern will.

Hier mein Quellcode (im Forum gefunden)

Delphi-Quellcode:

procedure TForm1.ExcelOeffnen;
  var
  WorkBk: _WorkBook; // ein WorkBook deklarieren
  WorkSheet: _WorkSheet; // ein WorkSheet deklarieren
  Excel: TExcelApplication;
  _lcid: LCID;
begin
  _lcid := GetUserDefaultLCID;
  Excel := TExcelApplication.Create(Self);

    // Zum Server TExcelApplication verbinden
   Excel.Connect;

   // WorkBooks zur ExcelApplication hinzufügen
     Excel.Workbooks.Open('C:\Fondskurse.xls', emptyParam, emptyParam,
        emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,
        emptyParam, emptyParam, emptyParam, emptyParam, EmptyParam,EmptyParam,EmptyParam,_lcid);
      // erstes WorkBook auswählen
      WorkBk := Excel.WorkBooks.Item[1];
      // erstes WorkSheet definieren
      WorkSheet := WorkBk.WorkSheets.Get_Item(1) as _WorkSheet;
      // Wer aus Zelle (1,1) anzeigen
     // ShowMessage(Worksheet.Cells.Item[1, 2].Value);

      Worksheet.Cells.Item[1, 1]:='test2';


      Excel.Save('C:\Fondskurse.xls'); // Auch schon mit WorkBk.Close(True, 'C:\Fondskurse.xls', emptyParam, _lcid); ausprobiert

      // Server disconnecten

      Excel.Quit;


end;
Ist es möglich das Excel Dokument zu speichern, so das es zu keiner extra Bestätigung kommt?

Und nebenbei: Was ist eigentlich ein WorkBook und WorkSheet? Wie kann ich mir das Vorstellen?


Bin dankbar für jede Hilfe,

Ferby
  Mit Zitat antworten Zitat