vba - formatting multiple pivot charts?

Hello All,

So found out how to format pivot tables using a for each...in .... loop, but need to do the same for pivot charts, and one bit of code is off.

Here is the successful code for pivot tables

Dim Worksheet As Worksheet
Set Worksheet = ThisWorkbook.Worksheets("Tables")
For Each PivotTable In Worksheet.PivotTables
    With PivotTable
        .RefreshTable
    End With
Next PivotTable

and here is the unsuccessful code for the pivot charts

Dim Worksheet As Worksheet
Set Worksheet = ThisWorkbook.Worksheets("Charts")
For Each ChartObject In Worksheet.ChartObjects
    For Each Chart In ChartObject.Charts
    With Chart
        .ChartType = xlLine
        .Axes(xlCategory).TicklLabels.Font.Size = 10
        .Axes(xlValue).TicklLabels.Font.Size = 10
    End With
    Next Chart
Next ChartObject

Code breaks on this line

      For Each Chart In ChartObject.Charts

With the phrase

Object doesn't support this property or method

sigh. so close.


EDIT: see follow-up question below