VBA Макросы. Как узнать, существует папка или нет?

Автор Посетитель, 28 декабря 2020, 15:19

Посетитель


Администратор

Sub Макрос()

    Dim FN_Папка As String
   
    FN_Папка = "C:\Users\User\Desktop\Папка"
    If Dir(FN_Папка, vbDirectory) <> "" Then
        MsgBox "Папка существует.", vbInformation
    Else
        MsgBox "Папка не существует.", vbExclamation
    End If
   
End Sub