Cut Paste charts from one slide to other

[charm1]

Hi VBA Masters

I am looking to cut the chart from one slide and paste it on the other visible slide at same position. It may require two different macro, 1st to store the position of selected chart create duplicate chart and cut... 2nd macro to paste on visible slide and apply the stored position.

I am not VBA pro, I have googled a lot and below is the code I reached so far to paste chart atleast on same slide.... but its not working

Requesting to look into it

Please Login or Register  to view this content.

[kev_]

This works for me and always appears to place chart in same position as original without being given coordinates

1 Place this code in a new module in powerpoint

Please Login or Register  to view this content.

2 Select chart and run GetShape

3 Activate target slide and run CutAndPaste

[charm1]

Hi Kev

Thanks for looking into this. The code is working fine, the only problem is it is cutting the original shape/chart. is there anyway to keep the original as is?

Regards,
Charm

[kev_]

Post#1
I am looking to cut the chart from one slide and paste it on the other visible slide at same position

Post#3
... only problem is it is cutting the original shape/chart ...

Hmmm!



Away from PC so cannot test until later ...

Try Replacing .Cut with .Copy

Please Login or Register  to view this content.

[charm1]

Hi Kev

Many thanks for your reply. It is important that it should CUT (not copy) the chart by keeping the original (by creating a duplicate of original).

I have tried below code after doing some modification in your code. It is working for autoshapes but not for charts.

Can you please look into this whenever you have access to you PC.

Please Login or Register  to view this content.

[kev_]

Delete prior code

Please Login or Register  to view this content.

1 Select chart & run GetShape
2 Select Target Slide & run CutAndPaste

[charm1]

Many Many Thanks, Kev

It is working with Charts as well

Marking this thread as "Solved"

Regards,
Charm