Forum: Programmieren allgemein
Delphi
by Chemiker,
13. Nov 2011
Hallo Cyberaxx,
gut das es jetzt funktioniert. Mir gingen langsam die Ideen aus.
Bis bald Chemiker
Forum: Programmieren allgemein
Delphi
by Chemiker,
13. Nov 2011
Hallo Cyberaxx,
noch ein Versuch:
procedure TForm1.btnRahmenZeichnenClick(Sender: TObject);
var
OLEvExcel: OleVariant;
begin
OLEvExcel := CreateOleObject('Excel.Application');
OLEvExcel.Visible:= TRUE;
OLEvExcel.Workbooks.add;
OLEvExcel.ActiveWorkbook.Worksheets;
Forum: Programmieren allgemein
Delphi
by Chemiker,
13. Nov 2011
Hallo Cyberaxx,
schaust Du mal im Taskmanger unter Prozesse nach, ob vieleicht noch andere Excel Instanzen laufen die nicht ordentlich geschlossen worden sind.
Bis bald Chemiker
Forum: Programmieren allgemein
Delphi
by Chemiker,
13. Nov 2011
Hallo Cyberaxx,
versuch mal das hier:
procedure TForm1.btnRahmenZeichnenClick(Sender: TObject);
var
OLEvExcel: OleVariant;
begin
OLEvExcel := CreateOleObject('Excel.Application');
OLEvExcel.Visible:= TRUE;
OLEvExcel.Workbooks.add;
Forum: Programmieren allgemein
Delphi
by Chemiker,
13. Nov 2011
Hallo Cyberaxx,
als bei mir funktioniert Dein Quellcode. Vielleicht ist das Worksheet nicht aktiviert.
olevEXCEL.ActiveWorkbook.Worksheets;
olevEXCEL.range.Select;
...
...Bis bald Chemiker
Forum: Programmieren allgemein
Delphi
by Chemiker,
12. Nov 2011
Hallo Cyberaxx,
die Doku ist die Hilfe von VBA in Excel, wie madtom schon geschrieben hat, kommt man am besten zum Ziel, wenn man sich einen Macro aufzeichnet und diesen dann in Delphi nachbildet.
olevEXCEL.range.Select; // Die Zelle A2
olevEXCEL.Selection.Borders.LineStyle := xlDashDot;
olevEXCEL.Selection.Borders.ColorIndex := 5; // blau
olevEXCEL.Selection.Borders.TintAndShade...