1. 程式人生 > 電腦技巧 >Excel VBA 建立目錄 MkDir 函數教學與範例

Excel VBA 建立目錄 MkDir 函數教學與範例

介紹如何使用 Excel VBA 的 MkDir 函數建立目錄。


建立目錄

如果要在 Excel 中以 VBA 巨集程式建立目錄,可以使用 MkDir 函數,其用法很簡單,呼叫 MkDir 函數之後,指定目錄的路徑即可。

MkDir "C:OfficeGuideTmpFolder"在呼叫 MkDir 函數建立目錄時,如果指定的目錄已經存在,就會產生「路徑或檔案存取錯誤」的錯誤訊息。

所以通常在建立目錄時,都會搭配 Dir 函數來檢查目錄是否已經存在:

' 確認目錄不存在

If Len(Dir("C:OfficeGuideTmpFolder", vbDirectory)) = 0 Then

MkDir "C:OfficeGuideTmpFolder"

End If

建立目錄

建立多層目錄

如果需要一次建立多層新的目錄,除了使用迴圈逐層建立之外,可以考慮使用 Shell 呼叫外部的 mkdir 自動建立目錄:

Dim folder As String

' 多層目錄

folder = "C:OfficeGuideTmpFolderABC"

' 自動建立多層目錄

Shell ("cmd /c mkdir """ & folder & """")

自動建立多層目錄在使用 Shell 建立目錄時,由於 Shell 會立即返回,並不會等待其指令執行完,如果緊接著對剛建立的目錄進行存取,就會產生目錄不存在的錯誤。

參考資料:AnalystCave