Delphi 如何控制Excel 的行分组(group)

如题
我想把第1行到第10行分组,就是Excel里面数据菜单下的"组及分级显示"的效果
我试过用
ExcelApplication1.Workbooks.Open(Opendialog1.FileName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,0);
ExcelWorkSheet1.ConnectTo((ExcelApplication1.Worksheets[1]) as _WorkSheet);
ExcelWorkSheet1.Cells.Range['A1','A10'].Group(EmptyParam,EmptyParam,EmptyParam,EmptyParam);但并不能把第一到第十行Group在一起啊,请问该怎么写?