Comments on: Apply Chart Formatting to Other Charts

By: Jon Peltier

Jon Peltier — Thu, 27 Aug 2009 17:05:56 +0000

Patricio -

This happens because Excel 2007 SP2 apparently has a bug. It doesn’t properly recognize xlFormats or xlPasteFormats. This bug is also present in Excel 2007 SP1 and presumably all Excel 2007 versions.

By: Patricio Cuaron

Patricio Cuaron — Tue, 25 Aug 2009 19:40:47 +0000

Great code, but in xl2007 sp2 it copies the format AND the data of the charts. Can’t figure out why yet.

By: Apply Chart Formatting to Other Charts | PTS Blog | HiTechBooks

Apply Chart Formatting to Other Charts | PTS Blog | HiTechBooks — Fri, 21 Aug 2009 19:34:37 +0000

[...] Here is the original post: Apply Chart Formatting to Other Charts | PTS Blog [...]

By: John Mansfield

John Mansfield — Fri, 21 Aug 2009 18:52:44 +0000

Very nice Jon. I tend to use worksheet cells for titles and totally missed that one.

I didn’t think I wrote the procedure very well to begin with and am glad you were able to improve it.

Thanks again.

By: AdamV

AdamV — Fri, 21 Aug 2009 16:07:23 +0000

Nice piece of code – as you say, this could be a jumping-off point for people with their own specific requirements.
For example, you could change the name of one chart to “Master” or somesuch, then find this one to copy formats from, and iterate through all the selected charts to apply the formats to.
This does seem to be one of the places where F4 (or CTRL-Y) seems to work just fine, as the last action is the paste special, so you are not plagued with the issues which beset the non-modal formatting dialog boxes.

By: Mike Alexander

Mike Alexander — Fri, 21 Aug 2009 15:58:16 +0000

Nice one Jon. You should make this part of the dashboarding bootcamp! VBA day.

By: JP

JP — Fri, 21 Aug 2009 15:00:11 +0000

“Fortunately we’re all expert programmers, with a thorough knowledge of Excel’s object model, so we recognize before even trashing all of our charts what steps we need to take.”

I wonder if a response or followup from the “OP” is forthcoming.

By: Jon Peltier

Jon Peltier — Fri, 21 Aug 2009 14:13:30 +0000

Ray -

Yep, everyone has their own requirements, I guess.

To do just the activesheet, replace this:

For Each Sht In ActiveWorkbook.Worksheets

with this:

Set Sht = ActiveSheet

and remove this:

Next Sht

Other options need similar changes. I imagine choosing both an active chart as the master chart and choosing only some charts to reformat would be a challenge, requiring some kind of dialog system.

By: Ray

Ray — Fri, 21 Aug 2009 13:38:43 +0000

Hi Jon -

Great tip, VERY useful … but what if you don’t want to change *every* chart in the *whole* workbook? Maybe just the selected charts or just the ones the active-sheet? A small pop-up box to solicit user-preferences perhaps?

Thanks alot!

//ray