chartobject

[alldreams]

MVPs,

Do you know of a way to convert a chartobject in the
activeworksheet to HTML so it can be emailed?

Thanks for the help!

 

[Frank Kabel]

Hi
if you're happy with an image file (GIF ( JPEG) have a look at
http://j-walk.com/ss/excel/files/charttools.htm
which lets you export your chart

 

[Tom Ogilvy]

You can use the export method of the chart object (a child of the
chartobject object) to produce a Gif or Jpg and mail that.

 

[Guest]

could you explain to me how to do it?

-----Original Message-----
You can use the export method of the chart object (a child of the
chartobject object) to produce a Gif or Jpg and mail that.

--
Regards,
Tom Ogilvy





.

 

[Tom Ogilvy]

It is a single command:Worksheets("Sheet1").ChartObjects(1) _
..Chart.Export _ FileName:="current_sales.gif", FilterName:="GIF"--

 

[alldreams]

This is my macro:

Sub test()

Worksheets("CHARTS").ChartObjects(580) _
..Chart.Export _
Filename:="current_sales.gif", FilterName:="GIF"

End Sub


I get the following error:

Unable to get the ChartObject property of the Worksheet
class

 

[Tom Ogilvy]

Sub tester10()

Worksheets("CHARTS").ChartObjects(1) _
..Chart.Export _
Filename:="f:\current_sales.gif", FilterName:="GIF"

End Sub

worked for me. If you have 580 charts on a single sheet, god bless you!