You can save a chart as *.png before posting that *.png only to Web

But I don't know how to do this throughButtonPublish

Sub SaveAspng()
' Saves the active chart as a png file
' Prompts for a file name and directory
Dim FileName As Variant
If ActiveChart Is Nothing Then
MsgBox "Select a chart to export."
Else
FileName = Application.GetSaveAsFilename( _
InitialFileName:=ActiveChart.Name & ".png", _
FileFilter:="png Files (*.png), *.png", _
Title:="Save chart as png file")
If FileName < False Then ActiveChart.Export FileName, "png"
End If
End Sub


Gord Dibben MS Excel MVP

On Sun, 22 Nov 2009 23:48:33 -0800 (PST), avi
wrote:

Hello,

The Publish process from Excel to Web transforms charts to Gif files,
resulting in poor resolution quality.

Is it possible to improve the quality by transforming to other
pictures types or by any other means?

Thanks
Avi