Exporting EXCEL Graphs as .gif (image file) using VBA or VB

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

ActiveSheet.Chartobjects(1).Chart.Export ThisWorkbook.Path &
"\test.gif", "GIF"

Tim


"haresh7263" <haresh7263.1rzdoa@> wrote in message
news:uaidnQ8M5agWWkzfRVn_vg@giganews.com...
>
> 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
>