Create Folder
Posted by Zzyzzyth on February 03, 2002 8:15 PM
Could someone help me with the code needed to create a new Folder in the current directory. I am tracking Profit(Loss) spreadsheets and would like to create Fiscal)2, Fiscal03, etc. automatically when the system date changes to our fiscal year.
Posted by John on February 04, 2002 9:23 AM
This will create a new folder in the folder containing your workbook:
Dim FilePath, fs
FilePath = ThisWorkbook.Path
Set fs = CreateObject("Scripting.FileSystemObject")
fs.createfolder (FilePath & "\YourFolderName")
Posted by ZZyzzyth on February 04, 2002 9:42 AM
Thank you so much - this website is a God send!!
