Einzelnen Beitrag anzeigen

Benutzerbild von Chemiker
Chemiker
Online

Registriert seit: 14. Aug 2005
1.861 Beiträge
 
Delphi 12 Athens
 
#7

Re: Zahlenwerte an Excel übergeben (Zellen ansprechen)

  Alt 4. Dez 2006, 20: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