Macro to Create Folder\Sub Folder\SubFolder\

Hi,

Can i please ask for assistant.

I am trying to create a macro for button.

Private Sub CommandButton1_Click()

End Sub

I know i have to use MKDIR but don't know how to write the code.

Column B Column C
Row 5 Drive Directory C
Row 6 Main Folder Bills
Row 7 Sub Folder 1 Insurance
Row 8 Sub Folder 2 Car
Row 9 Sub Folder 3 Ford
Row 10 Sub Folder 4 Max
Row 11 Sub Folder 5
Row 12 Sub Folder 6
Row 13 Sub Folder 7
Row 14 Sub Folder 8
Row 15 Sub Folder 9
Row 16 Sub Folder 10

As you see above user will enter the in column C drive\folder\sub folder\ etc.

cell B3 shows wahts the path will look like.

C:\Bills\Insurance\Car\Ford\Max\
If the folder exsit the display as meassage "Folder Exist - Please recheck".

I have attached file.