You can also build the desired chart title in the worksheet, and link
the title to it:

With ActiveChart
.HasTitle = True
.ChartTitle.Text = "=Sheet1!R6C6" ' Cell F6
End With

- Jon
-------
Jon Peltier, Microsoft Excel MVP
http://www.geocities.com/jonpeltier/Excel/index.html
_______

jmoffat wrote:
At the risk of pointing out something you may have already tried, have
you considered using:

With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = jm_title
End With

You can set jm_title to be anything - either by proimpting the user to
enter his/her details or by obtaining them automatically from the
system

eg:

jmtitle=graph_subject + Application.UserName + cstr(Date)

I havent tried to but you should be able to segment the title into
separate lines using the carrage return ascii code eg:


jmtitle=Application.UserName + chr(13) + graph_subject + chr(13)+
cstr(Date)


I don't live in San francisco but you can post a beer to london if this
is at all helpful.



------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/