Hi Sven,
Take a look at the code in my addin as a way around the problem.
(
http://www.andypope.info/vba/gex.htm)
Sven Aeyels wrote:
Hi,
I can save charts to gif. Is it possible to save picture to gif or jpg? I
use the following code to save charts:
Dim mychart As Chart
Set mychart = ActiveSheet.ChartObjects(1).Chart
mychart.Export Filename:=ThisWorkbook.Path & "\chrt1.gif",
FilterName:="GIF"
Set mychart = ActiveSheet.ChartObjects(2).Chart
mychart.Export Filename:=ThisWorkbook.Path & "\chrt2.gif",
FilterName:="GIF"
What do I have to change, so I can save pictures
Thanks in advance.
Kind regards,
Sven.
--
Andy Pope, Microsoft MVP - Excel
http://www.andypope.info