Djblois
08-29-2008, 06:04 AM
I found this code and would like to alter it to email a pic of the selected range in excel.
Fname = ThisWorkbook.Path & Application.PathSeparator & _
currentchart.name & ".gif" _
currentchart.Export Filename:=Fname, FilterName:="GIF"
Can someone please help me?
Fname = ThisWorkbook.Path & Application.PathSeparator & _
currentchart.name & ".gif" _
currentchart.Export Filename:=Fname, FilterName:="GIF"
Can someone please help me?