Home |
Search |
Today's Posts |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On 20 Nov, 10:49, Andy Pope wrote:
Hi, You need to include the Chart reference when using a ChartObject. Sub FindChartSeries() Dim myChartObject As ChartObject Dim mySeries As Series For Each myChartObject In ActiveSheet.ChartObjects * * *For Each mySeries In myChartObject.Chart.SeriesCollection * * * * *MsgBox "found series" * * *Next Next myChartObject End Sub Cheers Andy WhytheQ wrote: Good Morning, I've got 50 charts on one sheet; each with a varying number of lines on each chart. Need to adjust all the series in one move. Thought I'd be able to have a loop within a loop: '=========================== Sub FindChartSeries() Dim myChartObject As ChartObject Dim mySeries As Series For Each myChartObject In ActiveSheet.ChartObjects * * * * * * myChartObject.Select * * * * * * For Each mySeries In myChartObject.SeriesCollection * * * * * * * * * MsgBox "found series" * * * * * * Next Next myChartObject End Sub '=========================== Why is the above bugging out? Any help much appreciated Jason. -- Andy Pope, Microsoft MVP - Excelhttp://www.andypope.info- Hide quoted text - - Show quoted text - cheers Andy |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Dynamic chart - series label problem | Charts and Charting in Excel | |||
finding chart series low | Excel Programming | |||
Problem adding Series XValues to Chart using VBA | Charts and Charting in Excel | |||
Q. Pie Chart problem. Want to add series, from another worksheet. | Excel Programming | |||
international problem, decimal separator and chart series | Excel Programming |