【使用FileSystemObject函數判定路徑下資料夾是否存在】
Dim fs as Object
Set fs = CreateObject("Scripting.FileSystemObject")
If fs.FolderExists( 資料夾完整路徑 ) = True Then
'資料夾存在
Else
'資料夾不存在
End If
Set fs = Nothing
記得要釋放fs
相同功能:
〔VBA〕Dir-檢查資料夾是否存在--v002
〔VBA〕FileSystemObject-檢查檔案是否存在 --v026
章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/
※※ 本區做為經常使用之程式碼複製區,提問請至小講堂唷 ※※