How to add data Range property at runtime to excel sheet

[areddy]

Hi All,

In excel sheet i have a chart and table for which I am setting data range property at design time.based on the data i want to set it at run time.

select in chart menu---> Source data --> Data range property we are setting at design time. How to set this property at runtime. Please refer the attachment.

could you please help me.

Thanks & Regards in advance,
Areddy

[Leith Ross]

Hello Areddy,

_____________________________

Sub ChangeChartDataRange()

Dim Chrt As Chart
Set Chrt = ActiveSheet.ChartObjects("Chart 1").Chart
Chrt.SetSourceData Source:=Worksheets("TestTemplate1").Range(Cells(37, 7), Cells(38, 18))

End Sub
_____________________________

Be sure to change "Chart 1" to the system name for your chart. To find the system chart name, right click on the chart. Select "Chart Window" from the Popup Menu. The Title will contain the Workbook name and Worksheet name followed by the chart name. Just use the chart name.

Chart Name Example:
[My Workbook.xls]TestTemplate1 Chart 1

Sincerely,
Leith Ross