below macro, courtesy of ssaqibh from EE, adds the terms 'New grading system' on a new line to all existing chart titles on the active worksheet.
Is it possible to format this new line 'New grading system' different from the rest of the chart title by means of VBA. This line 'New grading system' should have Verdana, 6 pt, bold.
Help is much appreciated. Thank you very much in advance.
Regards, Andreas
Sub chttitles() For Each shp In ActiveSheet.Shapes If shp.Type = 3 Then shp.Chart.HasTitle = True shp.Chart.ChartTitle.Text = shp.Chart.ChartTitle.Text & Chr(10) & "New grading system" End If Next shpEnd Sub
great coding! That is exactly what I was looking for. Thank you very much for it.
On second thoughts, I wonder whether the following action is also possible:
If I wanted to change the font size, name and property on the line 'New grading system' without adding this line again?
That is, assuming 'New grading system' has been added to the chart titles before and now somebody or I would like to have just this line altered in terms of font size, font name etc.
Help is much appreciated. Thank you very much in advance.
shp.Chart.ChartTitle.Font.
shp.Chart.ChartTitle.Font.
gowflow