Как задать диапазон для графика в Excel в Delphi?

Экспортирую данные в Excel и строю по ним график. Данные расположены на нескольких страницах. На каждой странице есть заголовок. Необходимо построить график по нескольких диапазонам. Как их задать в Delphi?

введите сюда описание изображения

На VBA это выглядит так:

Range("A2:B7").Select
ActiveSheet.Shapes.AddChart2(201, xlColumnClustered).Select
ActiveChart.SetSourceData Source:=Range("'Архив профилей'!$A$2:$B$7, 'Архив профилей'!$A$10:$B$14")

На Delphi можно сделать так:

LShape := Sheet.Shapes.AddChart(51, LOffsetX, LOffsety,  LWidth, LHeight);
R1:=Sheet.Range[Sheet.Cells[2,1], Sheet.Cells[7,2]];
R2:=Sheet.Range[Sheet.Cells[10,1], Sheet.Cells[14,2]];
LShape.Chart.SetSourceData(Source:=Sheet.Range[R1, R2]);

Как создавать диапазоны динамически и передавать их в Chart?


Ответы (0 шт):