The easiest way probably is John Walkenbach's add-in Cha
W Wigi Jul 9, 2007 #2 Hi Jim A statement like this might set you on track: ActiveSheet.Chartobjects(1).Chart.Export "C:\Grafiek1.jpeg", ""
Hi Jim A statement like this might set you on track: ActiveSheet.Chartobjects(1).Chart.Export "C:\Grafiek1.jpeg", ""
J Jon Peltier Jul 9, 2007 #3 Use PNG or GIF formats instead of JPG, to get better results from chart-type images. - Jon