“XL VBA -Überprüfung auf Ordner” Code-Antworten

XL VBA -Überprüfung auf Ordner

Public Function IsDir(s)
    IsDir = CreateObject("Scripting.FileSystemObject").FolderExists(s)
End Function