map aanmaken gekoppeld aan formulier

[Melten]

Ik heb een formulier aangemaakt en wil dat er automatisch een folder aangemaakt wordt met de zelfde foldernaam overeenkomend met txtklantcode.
ik heb mkdir geprobeert en createfolder maar krijg telkens foutmeldingen. Wie kan mij helpen. Hier onder staat een stukje code van het formulier.

Private Sub cmdOK_Click()
'invullen van de cellen uit het invul formulier
frmNieuweklant.Hide
Range("B8").Select
ActiveCell.Value = txtnaam.Text
Range("a8").Select
ActiveCell.Value = txtklantcode.Text
Range("C8").Select
ActiveCell.Value = txtstraat.Text
Range("D8").Select
ActiveCell.Value = txtnummer.Text
Range("E8").Select
ActiveCell.Value = txtpostcode.Text
Range("F8").Select
ActiveCell.Value = txtwoonplaats.Text
Range("G8").Select
ActiveCell.Value = txttelvast.Text
Range("H8").Select
ActiveCell.Value = txttelmob.Text
Range("I8").Select
ActiveCell.Value = txtemail.Text
ChDir "C:\Documents and Settings\All Users\Documenten\"

 

[Gremail]

Onderstaande werkt perfect.

MkDir _
"C:\gewenste pad opgeven\" & Sheets("naam sheet opgeven").Range("A8")

 

[Axel Hagg]

Nieuwe map maken

CreateObject("Scripting.FileSystemObject").CreateFolder PadOudeMap & "NieuweMap\"

Vergeet niet in Extra Verwijzingen Microsoft Scripting Runtime aan te vinken