I want to do the following:

For Each objCht In SheetCodeName
With objCht
Debug.Print .Chart.ChartTitle.Text
End With
Next objCht

I'm getting an error on the first line. For this example, I'm assuming the
code name is SheetCodeName. What am I doing wrong.

In addition, I want to parse the chart title with the split at "-", what do
I need to do. There should be only one entry of "-"

Thanks