如何用vba显示或删除图表的标题？

在vba中表示ChartTitle对象代表图表的标题。

如果要设置图表对象Chart的标题，首先要设置图表对象Chart的HasTitle属性为True，然后设置ChartTitle对象的Text为具体要显示的标题文本即可。

如果要删除图表对象Chart的标题，则只需要设置图表对象Chart的HasTitle属性为False即可。

代码如下：

Sub QQ1722187970()
    Dim oWK As Worksheet
    Set oWK = Excel.ActiveSheet
    Dim oChart As Chart
    Dim oChartObject As ChartObject
    '先创建一个空白的图形壳
    Set oChartObject = oWK.ChartObjects(1)
    Set oChart = oChartObject.Chart
    Dim oCT As ChartTitle
    With oChart
        '这句一定要有，否则不能设置图表的标题
        .HasTitle = True
       Set oCT = .ChartTitle
       With oCT
            .Text = "这是一个图表标题"
       End With
    End With
End Sub