Einzelnen Beitrag anzeigen

Benutzerbild von Jens Schumann
Jens Schumann

Registriert seit: 27. Apr 2003
Ort: Bad Honnef
1.644 Beiträge
 
Delphi 2009 Professional
 
#1

Excel - bestimmte Zeilen markieren und gruppieren

  Alt 20. Jan 2004, 17:11
Hallo,
ich suche ein Lösung um aus Delphi heraus in einer Exceltabelle (WorkSheet) bestimmte Zeilen
zu markieren und anschließend zu gruppieren.

Das hat mir der Markorecorder geliefert:
Code:
Sub Makro1()
'
' Makro1 Makro
' Makro am 20.01.2004 von Jens Schumann aufgezeichnet
'

'
    Rows("2:9").Select
    Selection.Rows.Group
End Sub
Und hier mein jämmerlicher Versuch das Makro nach Delphi zu übertragen.

Delphi-Quellcode:
var
  Filename : String;
begin
  Filename:=ApplicationPath+'mappe1.xls';
  ExcelApplication.Workbooks.Open(Filename,EmptyParam,EmptyParam,EmptyParam,
                                  EmptyParam,EmptyParam,EmptyParam,EmptyParam,
                                  EmptyParam,EmptyParam,EmptyParam,EmptyParam,
                                  EmptyParam,FLCID);
  ExcelWorkbook.ConnectTo(ExcelApplication.Workbooks.Item['mappe1.xls']);
  ExcelWorksheet.ConnectTo(ExcelWorkbook.Sheets.Item['Tabelle2'] as _WorkSheet);


  ExcelWorksheet.Rows.Range_['A2','A8'].Select; // Die Paramter sind hier falsch
  ExcelWorksheet.Rows.Group(EmptyParam,EmptyParam,EmptyParam,EmptyParam);

  ExcelWorkbook.Save;
  ExcelWorkbook.Close;
end;
Probleme machen die Paramter für das Range Objekt.
Weiß jemand was ich machenn muss ?
  Mit Zitat antworten Zitat