Thanks for your response... I went with the following:
Sub createfolder()
Dim MyDir As String
MyDir = [B1] & "\" & [b2]
On Error GoTo Exists
MkDir MyDir
Exit Sub
Exists: MsgBox "Already exists...change B2", vbExclamation
End Sub
B1 is the path to the folder, B2 is the new one