I am new to this VBA thing so any help would be welcome.
I need to create a file folder for all of the companies
listed in column F of my worksheet. I have a button on
the worksheet with the following line of code attached
but can not see how to move down to the next row.
Also is there a way to check if the folder exists, if it
does to ignore it and move to the next row.
Thanks
Andy
Private Sub CommandButton1_Click()
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.createfolder("E:/Customers and Contacts/")
a.Close
End Sub
Bookmarks