Workbook.Charts (Excel)

Returns a Sheets collection that represents all the chart sheets in the specified workbook.

Dim shtsCharts As Sheets
Set shtsCharts = ActiveWorkbook.Charts