Convert all charts to pictures

Hello,

I have a worksheet with multiple charts.
I wish to convert all of them to pictures.

I tried the following code.
My problem is that I get all the pictures in the same place and not in the original chart place.

Please Login or Register  to view this content.

Can you help me ?

Thank you for your help

Hello,

Thank you for your support. It was not easy to solve it.

I tried the code on a new sheet (as you did) and it worked as expected.

I had to do 2 modifications to the module:
1. My original sheet was 'right to left' direction. I had to modify the sheet direction to 'left to right' before the copy-paste process and change it back after that.
2. I had to change "With .Shapes(.Shapes.Count)" to "With .Pictures(.Pictures.Count)" (I do not understand why it did not work with shapes).

Thank you for your help

Hello,

I am using Excel 2010.
The .left property value of the charts is ~87000 (when the sheet direction is right to left and the chart is on C column).
I think that there are more issues of modifying charts & sheet direction.

Thank you