Sign in to follow this  
Followers 0
burger

Excel Charts

1 post in this topic

LocoDarwin offered to convert VBA chart code to someone on an old post and was never responded to. If the offer still stands, I would like to be able to generate charts and here is the VBA code to create a chart and then save it as a GIF file.

Sub Chart()
'
' Chart Macro
'

'
    Range("E5:E7").Select
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=Range("Sheet1!$E$5:$E$7")
    ActiveChart.ChartType = xlPie
    Fname = "c:\test.gif"
    ActiveChart.Export Filename:=Fname, FilterName:="GIF"
End Sub

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0