ActiveSheet.Chartobjects(1).Chart.Export ThisWorkbook.Path &
"\test.gif", "GIF"
Tim
"haresh7263" <haresh7263.1rzdoa@ wrote in message
...
I am working on a Assignment where I am supposed to provide a
facility
of Exporting the Graph as a .gif image. Sort of SaveAs...
A working code snippet would be really helpful.....
Code could be VBA or VB
--
haresh7263Posted from http://www.pcreview.co.uk/ newsgroup access