hello,

I have code, which export charts as gif:

Worksheets("Graphs").ChartObjects(1) _
..Chart.Export _
Filename:="Total_GRPs.gif", FilterName:="GIF"

is there way how to specify the path for export?

I want to export it in same location, where my xls file is saved, but
in new folder "charts"....can I create a new folder with macro from
excel?

thanx

tommy


--
tommy_gtr
------------------------------------------------------------------------
tommy_gtr's Profile: http://www.excelforum.com/member.php...o&userid=26089
View this thread: http://www.excelforum.com/showthread...hreadid=493301

Filename:="C:\testfolder\Total.gif", FilterName:="GIF"


--
Kaak
------------------------------------------------------------------------
Kaak's Profile: http://www.excelforum.com/member.php...fo&userid=7513
View this thread: http://www.excelforum.com/showthread...hreadid=493301

FileStr = Thisworkbook.path & "\Total.gif"

Filename:=FileStr, FilterName:="GIF"


--
Kaak
------------------------------------------------------------------------
Kaak's Profile: http://www.excelforum.com/member.php...fo&userid=7513
View this thread: http://www.excelforum.com/showthread...hreadid=493301

Sorry for the bad posts

Function CreateFolder(FilePath)

Dim FSObj As Object

Set FSObj = CreateObject("Scripting.FilesystemObject")

FSObj.CreateFolder FilePath

End Function


--
Kaak
------------------------------------------------------------------------
Kaak's Profile: http://www.excelforum.com/member.php...fo&userid=7513
View this thread: http://www.excelforum.com/showthread...hreadid=493301

thank you for your answer, but I'm not sure how to use this function.

I'm not very experienced with using of function.

Can you more specify your solution, please

thanks

tomm

--
tommy_gt
-----------------------------------------------------------------------
tommy_gtr's Profile: http://www.excelforum.com/member.php...fo&userid=2608
View this thread: http://www.excelforum.com/showthread.php?threadid=49330