Excel Problem

[souly]

Hallo erstmal.

Ich hab mir einige tutorials durchgelesen und auch hier im Forum ein wenig gewühlt, aber die wirkliche Lösung von meinem Problem hab ich nicht gefunden. Ich benutze Delphi 2005 mit der kostenlosen Lizenz.

Um die Verbindung mit Excel herzustellen, schiebe ich einen TOleContainer auf meine Designvorlage. Wenn ich dann nen Doppelklick drauf mache, kann ich ganz bequem das gewünsche Programm auswählen ( in meinem Fall Excel ) und kann sogar eine xls-Vorlage als ausgang nehmen. So weit so gut... nun habe ich keinen blassen Schimmer, wie ich im worksheet was verändern kann ? der Tolecontainer gibts prozedurenmäßig nicht besonders viel her ... ist sicherlich nur meine Blindheit, aber ich komm nicht weiter.

MfG, souly

[souly]

http://forum.dsdt.info/viewtopic.php...1cf47684d4f521


lösen tut das mein Problem aber nicht

[crocodilechris]

Versuchs mal so:
is von hier aus der Code-Library: http://www.delphipraxis.net/internal...ighlight=excel

Delphi-Quellcode:

procedure Excelauf;
var
  row, column: Integer;
begin
  Excel := CreateOleObject('Excel.Application');

  //Hier kommt der weitere Code hin

  excel.Application.SheetsInNewWorkBook := 1; //Die 8 is die Anzahl der Sheets
  Excel.Workbooks.Add;

  Excel.Sheets[1].Name := 'DP Sheet'; //Hierbei ist 1 das erste Sheet 2 das zweite usw.
  //von nun an können wir unser Sheet auch über den gegebenen Namen ansprechen! zB:
  Excel.Sheets['DP Sheet'];

  row    := 1;
column := 2;
Excel.Sheets['DP Sheet'].Cells[row,column].Value := 'Hallo';
Excel.Sheets['DP Sheet'].Cells[1,3].value := 5.23; //Da Value vom Typ Variant is können wir hier fast alles reinschreiben
Excel.Visible := true;
end;

Kannste zwwar nich sehen, was du änderst, aber das funktioniert, kannst das gesamte Dokument damit bearbeiten ;)
Bei mir hat das Tut gefunzt :)