Run-time error '438': - trying to delete a chart on workbook close

[bishoposiris]

I'm trying to delete a chart when I close a workbook using the following code:

Please Login or Register  to view this content.

but I'm getting error: Run-time error '438': Object doesn't support this property or method at .Charts("Defects Level 1").Activate. I've tried variations on .Charts, .ActiveChart, and .ChartObjects but I'm not having any luck. Any ideas?

[bishoposiris]

I was able to solve this by using the following code:

Please Login or Register  to view this content.

This deletes all the charts on all the sheets in my workbook. Hope this helps.

[JaguerRhye]

I got similar errors as you. However, this syntax seems to work if you just want to delete a particular chart on the worksheet:

.ChartObjects("Defects Level 1").Delete

I don't know if you really have to activate the chart first before deleting it.