You can use the built in VBA DIR() function to do this.

Here is an example UDF:


Option Compare Database
Option Explicit

Public Function fFolderExists(strFullPath As String) As Boolean
'Author       : Boyd Trimmell aka HiTechCoach at http://www.hitechcoach.com
'Purpose: Check if a folder exists
' Returns: True or False
    
Dim strFolderPath As String

    strFolderPath = strFullPath
    
    ' make sure folder path ends with a \
    If Right(strFolderPath, 1) <> "\" Then strFolderPath = strFolderPath & "\"
    
    On Error Resume Next
    If Not Dir(strFolderPath, vbDirectory) = vbNullString Then fFolderExists = True
    

End Function

Example usage in the immediate windows:

? fFolderExists("\\DELL800W7\Data2\Backups\MiltonHPlaptop")