My solution to his problem was the code that you will find below. The code loops in every sheet and tries to find embedded charts. Afterwards, it loops in chart sheets. Whenever a chart is found, is copied and is inserted as a picture to a new power point slide.

The previous week a friend of mine asked me for a favor. He told me that he spends a lot of time copying Excel charts (as pictures) to Power Point presentations. The problem was that he had some really large workbooks that contained experimental results. Each workbook had more than 20 charts, so the procedure of “copy – paste special” was really time-consuming (and boring). He wanted from each workbook to create a new presentation and in every slide to include a text box with the chart title and the chart itself as picture.

VBA code