Solved

Add a term to all titles of all the charts on the active worksheet

Posted on 2012-12-29
3
185 Views
Last Modified: 2013-01-03
Dear Experts:

I got more than 50 bar charts on the active worksheet (Excel 2010)

Is it possible by means of macro to alter the titles of these charts as follows:

- Go to the end of each title
- press Shift + Enter to enter a manual line break
- add the following term - New Grading System -

So, for example if one of the titles reads: 'Sales force Appraisal'
After running the macro it should read:

Sales force Appraisal
New Grading System

Help is much appreciated. Thank you very much in advance.

Regards, Andreas
0
Comment
Question by:AndreasHermle
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
3 Comments
 
LVL 43

Accepted Solution

by:
Saqib Husain, Syed earned 500 total points
ID: 38729102
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 shp
End Sub
0
 

Author Comment

by:AndreasHermle
ID: 38735701
Hi Syed:

thank you very much for your great and professional help. Works like a charm.

Regards, Andreas
0
 

Author Closing Comment

by:AndreasHermle
ID: 38739283
Hi ssagibh:

great job. Thank you very much! Works great.

Regards, Andreas
0

Featured Post

[Webinar] How Hackers Steal Your Credentials

Do You Know How Hackers Steal Your Credentials? Join us and Skyport Systems to learn how hackers steal your credentials and why Active Directory must be secure to stop them. Thursday, July 13, 2017 10:00 A.M. PDT

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction This Article briefly covers methods of calculating the NPV and IRR variants in Excel as well as the limitations in calculating and interpreting IRR results. Paraphrasing Richard Shockley, author of my favourite finance reference tex…
Freeze panes is an option within all variants of Excel to enable parts of a sheet to remain stationary when the cursor is in another part of the sheet. This is a very useful feature which is overlooked or under used.
This Micro Tutorial will demonstrate how to use a scrolling table in Microsoft Excel using the INDEX function.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

690 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question