Группировка столбцов в excel

[straik]

Добрый день! Возник вопрос? Вывожу данные в excel использую Automation. Необходимо чтобы лист был сгруппирован по столбцам. Как это сделать?
В excel когда делаю группировку столбцов, то появляются кнопочки 1 и 2, которые открывают сгруппированные столбцы и закрывают.

[.Quattro.]

Поиграйтесь этим кодом:

Цитата:

GroupRange(RangeText : Text[30];What : 'Rows,Cols');
IF What = What::Rows THEN
xlWorkSheet.Range(RangeText).Rows.Group
ELSE
xlWorkSheet.Range(RangeText).Columns.Group;

RangeText - это адреса ячеек, к примеру B11

[straik]

Спасибо! Все работает!