Create a new directory

Jong · Jul 15th 2004

How do you create a new directory in VBA code?

I want to be able to check if the directory exists, and if it doesn't to create it.

ThisWorkbook.Path & "\Help" is an example of what needs to be created if it does not yet exist

Jong · Jul 15th 2004

Again, i overlook things. I managed to figure it out:

Code

If mFileSysObj.folderexists(ThisWorkbook.Path & "\Help\") = False Then
        Call mFileSysObj.CreateFolder(ThisWorkbook.Path & "\Help\")
    End If

Richie(UK) · Jul 15th 2004

Hi Jon,

Or ...

Code

Sub Test()
    
    On Error Resume Next
    MkDir ThisWorkbook.Path & "\Help"
    On Error GoTo 0
    
End Sub

Participate now!