Copy Chart Formats using VBA

[Tracyt]

Hi All,
I am novice to VBA and trying to learn.
I am creating a simple bar chart and Want to copy the format of the chart and apply to another charts.
i have used code from the peltiertech blog CopyChartFormatsNotTitles2, but some of the formatting is not working when i run the code:
-series color is not getting formatted
- i have used Switched Row/Column while creating the bar chart, this is also not getting mirrored
-Legends not getting mirrored.
Let me know if am not enough clear. I have also attached the chart and sample data that i want to use as base.
and below is the code so far i have tried.

Please Login or Register  to view this content.

[humdingaling]

the code is doing what it is designed to do

to switch data to columns
add this line at the start of the cht.chart

Please Login or Register  to view this content.

after this the legend works fine