Chart object number

  • Thread starter Thread starter Tom
  • Start date Start date
T

Tom

I have a number of charts in my worksheet that I would like to copy to a word
document. I am thinking the best way is to:

1. select the chart object
2. copy it
3. Tthen open a Word doc (not sure about the code for this)
4. paste it in the word doc

How can I get the chart object number to select the chart? for example if I
have 200 charts they are not always numbered sequentially from 1-200
depending on how many times the charts are created. I may have a chart 299,
then a chart 333. How do I go the chart object number to be able to
reference it and select the chart.
 
You could manually or programmatically rename the chart objects
(http://peltiertech.com/Excel/ChartsHowTo/NameAChart.html). If the charts
are created programmatically, this naming can be integrated into the code.

Or if you know where the charts are in the sheet, you can loop through the
chart objects to find the one whose .TopLeftCell is a particular cell.

- Jon
 
Jon,

Thanks. I will try to programmatically rename them. Is there a way to
determine the index number for each chart and then use that?

Thanks
Tom
 
If you don't care which ones are accessed in which order, you could use
this:

For iChart = 1 To ActiveSheet.ChartObjects.Count
With ActiveSheet.ChartObjects(iChart)
' do your stuff
End With
Next

- Jon
 
Back
Top