Excel VBA MkDir Ошибка времени выполнения

Question

Я хочу создать папку по адресу, который хранится в ячейке B6. Адрес: H: \ jpDesk \ Desktop \ Test Project

Sub SetUpLocalFolder() 

Workbooks("Robot Model.xlsm").Activate 
LocalPath = ActiveWorkbook.Worksheets("Preparation").Range("B6").Value 
Debug.Print LocalPath 
If Right(LocalPath, 1) <> "\" Then LocalPath = LocalPath & "\" 

'check if the folder is already created 
If Len(Dir(""" & LocalPath & """, vbDirectory)) = 0 Then 
    MkDir """ & LocalPath & """ 'Error shows here 
    MsgBox ("The local folder is successfully created.") 
End If 

End Sub 

ошибка показывает "Ошибка выполнения '76' Путь не найден.", Но Debug.Print показывает правильный адрес. Если я изменю код на MkDir «H: \ jpDesk \ Desktop \ Test Project», тогда все будет работать. Может кто-нибудь, пожалуйста, дайте мне знать, почему?

Answer 1

Потому что вам не нужны "" "& и &" "".

ИЛИ что папка уже существует.