Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Exports the active chart as a GIF file

Sub ExportChart()     Dim myChart As Chart     Set myChart = ActiveChart     myChart.Export Filename:="C:\Chart.gif", Filtername:="GIF" End Sub