Excel VBA Check if directory exists error

Question

I have a spreadsheet that upon clicking a button will duplicate itself by copying/pasting everything to a new workbook and save the file with a name that is dependent upon s

Answer 1

This is the cleanest way... BY FAR:

Public Function IsDir(s)
    IsDir = CreateObject("Scripting.FileSystemObject").FolderExists(s)
End Function