Help with a MS Graph Title

E

EAB1977

Hi. I can't get the chart title to change and I always get a error
stating that it isn;t a automation object. What am doing wrong here? I
tried looking on the KB site and I downloaded the example, but to no
avail.

Sub ReportChartTitle()
On Error GoTo Report_Error

Dim chtTitle As Graph.ChartTitle

Set chtTitle = Graph.Application

chtTitle.Text = Forms!frmReports!txtPlant & "Wet Ink by Month"

Report_Exit:
Exit Sub

Report_Error:
MsgBox Err.Description
Resume Report_Exit

End Sub
 
Top