skaswani
10-25-2007, 09:22 AM
Sub ExportChartJPG()
For i = 1 To Sheets.Count
ActiveChart.Export Filename:="C:\mycharts\" & Sheets.Name & ".jpg", _
FilterName:="jpeg"
Next
End Sub
hello
can anyone correct me where i am wrong, what i want to do is, that i want to export my all charts exists on my current sheets export as jpeg or gif" and with the sheet name
ie. if the sheet name is BOP then filename shouldbe bop.jpg or bop.gif
thankyou!
For i = 1 To Sheets.Count
ActiveChart.Export Filename:="C:\mycharts\" & Sheets.Name & ".jpg", _
FilterName:="jpeg"
Next
End Sub
hello
can anyone correct me where i am wrong, what i want to do is, that i want to export my all charts exists on my current sheets export as jpeg or gif" and with the sheet name
ie. if the sheet name is BOP then filename shouldbe bop.jpg or bop.gif
thankyou!