If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.

Userforms containing Graphs

Thread starter Peter Rattigan
Start date Nov 28, 2005

Peter Rattigan

Board Regular

Nov 28, 2005

I have been searching this forum for info on creating a userform to display the graphs in my worksheet. I have found the code below to save the graph as a GIF. I have tried to make it work but I am having trouble with the syntax and was hoping someone could give me a hand with it. The file name is C:\Debt Projector and the sheet/chart is Sheets("loanportfolio").Chart(1).Chart

Code:

    Set CurrentChart = Sheets("Sheet1").ChartObjects(1).Chart
    Fname = ThisWorkbook.Path & "\temp.gif"
    CurrentChart.Export FileName:=Fname, FilterName:="GIF"

I presume I would load this code in the "This Workbook" area to run on opening so that the userform would display immediately.

Would the second portion of the code (below) run in the same sub routine?

Code: