Chart.ChartTitle (Word)

Returns the title of the specified chart.

The ChartTitle object does not exist and cannot be used unless the HasTitle property for the chart is True.

With ActiveDocument.InlineShapes(1).Chart 
 .HasTitle = True 
 .ChartTitle.Text = "First Quarter Sales" 
End With