Einzelnen Beitrag anzeigen

Benutzerbild von Chemiker
Chemiker

Registriert seit: 14. Aug 2005
1.859 Beiträge
 
Delphi 11 Alexandria
 
#7

Re: Zahlenwerte an Excel übergeben (Zellen ansprechen)

  Alt 4. Dez 2006, 21:15
Hallo Mucki, Brueckenhauer und Andidreas,

die Hilfe die Ihr braucht steht unter Visual Basic-Editor, und da unter Hilfe nachschauen.

Unter Menü-Punkt: Extras
Makro
Visual Basic-Editor


Um an die Syntax der Excel-Befehl zu kommen kann es sinnvoll sein sie zuvor als Makro in Excel aufzeichnen zu lassen und anschliessend in Delphi umzusetzen.

Für das direkte Abspeichern könnte man so vorgehen (Das funktioniert aber nur, wenn die Datei noch nicht vorhanden ist.

Delphi-Quellcode:
procedure ExcelAbspeichern (m_Excel: Variant; ExcelDateiName: String);
begin

  m_Excel.ActiveWorkbook.Saved:= FALSE; // Excel schliessen ohne Nachfragen

  m_Excel.ActiveWorkbook.Close (saveChanges:= TRUE, FileName:= ExcelDateiName);
  m_Excel.Quit;
end;
Das UP wird dann so aufgerufen:
ExcelAbspeichern (Excel, 'c:\Test Excel Abspeichern.xls'); Die Anweisung : " Excel.Workbooks.Close;" muss dann natürlich aus dem Programm gelöscht werden.


Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.
  Mit Zitat antworten Zitat