group charts and paste as picture

**Mkamilp** · 07-01-2011, 08:02 AM

Hope you might help me in solving my problem.

Here is what I am trying to do..:

I have an excel sheet that has charts…

I found a code to line up the charts in vertical order..
Now I am trying to select each 3 chart as a group like 1 to 3, 3 to 6, 6 to 9 and paste them as picture. My knowledge on vba and coding is quite limited and thats why I am asking ur help

It would be great if u have time to help me on this issue…
Thanks..

Please Login or Register  to view this content.

**Andy Pope** · 07-01-2011, 11:55 AM

You don't say what you want to do with the newly created pictures.

Please Login or Register  to view this content.

**Mkamilp** · 07-01-2011, 01:25 PM

This really works

Thanks alot....

Well let me explain what I am trying to do as a whole...

I have too many charts on an excel sheet and I copy them to powerpoint everymonth..It was taking me like 2 days to copy,paste,set location and prepare the presentation doc.

After getting familiar with VBA I thought I can compile a macro to help in doing these presentations...

Since there are too many charts I dont want to paste them as an excelchart. Instead I group each 3 chart and paste as picture on one slide.

After my research on net I found a code to copy excel charts to powerpoint but it :

1-copy and paste them as excel chart which I dont prefer to do.
2- Paste one chart on each powerpoint slide by centerally positioning it on slide.

if I can link these two codes to each other..I mean if these excel to powerpoint macro can copy those pictures to slides in order, it will be amazing...

Here is the code that I found for transferring excel charts to powerpoint.

Please Login or Register  to view this content.

I attached the simplified version of the file I am working on.. it probably better explains what I am trying to do..

**Andy Pope** · 07-02-2011, 07:17 AM

Please Login or Register  to view this content.

**Mkamilp** · 07-03-2011, 02:05 PM

Especially after struggling too long on doing these slides manually its awesome to watch everything running with a code...Thanks alot Andy..!!

I think I have problem with the code...I tried last night at home and it ws working properly( I have office 2007 installed on my laptop). When I tried the code at office (office 2010) it start running but did not work properly... it highlights " .Shapes.PasteSpecial ppPasteDefault " and attached Debug secreen appears..

What should I do?

**Andy Pope** · 07-04-2011, 03:47 AM

No idea, just tried it on my work pc with xl2010 and ppt2010 and it worked fine.

**Mkamilp** · 07-05-2011, 03:18 AM

I tried yesterday on three different computers. Code works well on xl2007 document which has 60 charts on a sheet and 16 sheet in total. It probably works on xl2010 as well. I think I have a problem with my office computer will try to fix it..Thanks again for the help..