Did you know that you can programatically make changes to Excel Charts? Yes you can! Let us try updating a chart by adding the chart title using Excel Macros!

Make sure your Excel has the Developer Tab enabled following this tutorial.

I explain how you can do this below step by step!

What does it do?

Adds a title to the selected chart based on user input

Copy Source Code:


'Make sure you have selected your chart first
Sub AddChartTitle()

Dim titleText As Variant

On Error GoTo Last
'Get the Chart Title from the user
titleText = InputBox("Please enter the chart title", "Chart Title Input")

'Now set the title on the selected chart
ActiveChart.SetElement (msoElementChartTitleAboveChart)
ActiveChart.ChartTitle.Text = titleText
Last: Exit Sub

End Sub

Final Result: 

Add Chart Title Using Macros In Excel | MyExcelOnline

Exercise Workbook:

Add Chart Title Using Macros In Excel | MyExcelOnline

DOWNLOAD EXCEL WORKBOOK


This is our starting chart:

Add Chart Title Using Macros In Excel | MyExcelOnline

STEP 1: Go to Developer > Code > Visual Basic

Add Chart Title Using Macros In Excel | MyExcelOnline

 

STEP 2: Paste in your code and Select Save. Close the window afterwards.

Add Chart Title Using Macros In Excel | MyExcelOnline

 

STEP 3: Let us test it out!

Open the sheet containing the chart. Go to Developer > Code > Macros

Add Chart Title Using Macros In Excel | MyExcelOnline

 

Make sure your chart and macro are selected. Click Run.

Add Chart Title Using Macros In Excel | MyExcelOnline

Type in the title you want for your chart. Click OK.

Add Chart Title Using Macros In Excel | MyExcelOnline

With just that, you have modified the chart title!Add Chart Title Using Macros In Excel | MyExcelOnline

 

How to Add Chart Title Using Macros In Excel

 

101 Macros Book

HELPFUL RESOURCES:

Get access to 30+ Microsoft Excel & Office courses for ONLY $1.


Click here to get this limited-time $1 offer!



 

If you like this Excel tip, please share itEmail this to someone

email

Pin on Pinterest

Share on Facebook

Tweet about this on Twitter

Share on LinkedIn