Copy charts from 1 workbook to another

[Arlette]

I have created a macro which copies some charts from one workbook to
another. It has to repeat this for several tabs of the workbook. I
need to know if i need to create an object to copy n paste these
charts or can it be done without an object. A quick reply is
appreciated.

 

[John Mansfield]

I believe you would just need to create a worksheet variable combined with a
worksheet loop to copy all of the charts.

If I'm understanding your question correctly, something like this should
hopefully work:

Sub CopyCharts()
Dim wks As Worksheet
Dim cht As ChartObject
For Each wks In Worksheets
For Each cht In wks.ChartObjects
'Your copy and paste code here.
Next cht
Next wks
End Sub

 

[Arlette]

What if there are about 10 charts and i have to copy just 5 of them?
Should i create objects for each of these 5 to be copied?