How to set XY Line Chart Title text?

[ThomasHaller]

Hello folks,

I am using an X-Y Line Chart and I cannot seem to find the syntax to set the chart title!?!

Here is an example of my attempts, that always gives the error

"Run-time error '438': Object does support this property or method"

Worksheets("Cond Graphs").ChartObjects("Chart 1").ChartTitle.Text = "Conductivity"

Can anyone help with what I am doing wrong? I've tried removing the ".Text", I have tried various ways of identifying the chart, but I always get that same error message.

- Thomas

[tom1977]

try maybe this

Sub bb()
With Sheets("Cond Graphs").ChartObjects("Chart 1")
.Chart.HasTitle = True
.Chart.ChartTitle.Text = "Conductivity"
End With
End Sub

[ThomasHaller]

Thanks tom,

It looks like your code would work, the problem with mine was I was leaving out the object descriptor ".Chart", after the ChartObjects("Chart 1"). and before the ChartTitle. Here is the line from my code that works:

Worksheets("Cond Graphs").ChartObjects("Chart 1").Chart.ChartTitle.Text = "Conductivity"

Then I got fancy, as I wanted the Chart Title to come from the imported data:

' Set Chart Title from appropriate cell on AIO-Cond data import sheet

Dim ChartTitle As String

ChartTitle = Worksheets("AIO-Cond").Range("C2") & Worksheets("AIO-Cond").Range("C3")

Worksheets("Cond Graphs").ChartObjects("Chart 1").Chart.ChartTitle.Text = ChartTitle

Problem Solved!

- Thomas