Firstly, the "/" needs to be "\"

Since newDir has been defined as a string, using this would solve the issue.

If newDir = vbNullString Then