Why bother checking, just create it with error handling

[vba]
On Error Resume Next
MkDir directoryname
On Error Goto 0
[/vba]