ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Charts and Charting in Excel (https://www.excelbanter.com/charts-charting-excel/)
-   -   Excel Chart Title (https://www.excelbanter.com/charts-charting-excel/238818-excel-chart-title.html)

nzadmin

Excel Chart Title
 
I'm using excel 2007 Service Pack 2.

Trying to change part of the chart title. No problem in previous versions of
Exel.
Now the whole Title changes - not just part of it. Following is sample code:


Sub test()

Workbooks("Book1.xlsx").Activate
Charts("Chart1").Select

Title1 = "New Title1"
Title2 = "New Title2"
Title = Title1 & Chr(10) & Title2
ActiveChart.ChartTitle.Text = Title

ActiveChart.ChartTitle.Select

With ActiveChart.ChartTitle
With .Characters(Start:=1, Length:=Len(Title1)).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 20
End With

With .Characters(Start:=Len(Title1) + 1, Length:=Len(Title2)).Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 12
End With
End With

End Sub


Andy Pope

Excel Chart Title
 
Hi,

This is a known bug in 2007.
Work around is to use a textbox.

Cheers
Andy

--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info
"nzadmin" wrote in message
...
I'm using excel 2007 Service Pack 2.

Trying to change part of the chart title. No problem in previous versions
of
Exel.
Now the whole Title changes - not just part of it. Following is sample
code:


Sub test()

Workbooks("Book1.xlsx").Activate
Charts("Chart1").Select

Title1 = "New Title1"
Title2 = "New Title2"
Title = Title1 & Chr(10) & Title2
ActiveChart.ChartTitle.Text = Title

ActiveChart.ChartTitle.Select

With ActiveChart.ChartTitle
With .Characters(Start:=1, Length:=Len(Title1)).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 20
End With

With .Characters(Start:=Len(Title1) + 1, Length:=Len(Title2)).Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 12
End With
End With

End Sub




All times are GMT +1. The time now is 04:23 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com