Item: 土司森林
Rating: 4
Author: 錦子老師

2751

Excel VBA 建立多層目錄

齊秀瑛：「錦子老師，前面看過你的文章如何用EXCEL VBA建立目錄，但如果我想要在指定的位置來建立多層資料夾，該如何寫程序呢？」

錦子老師：「其實可以使用MkDir函數透過Shell呼叫來完成。」

按ALT+F11鍵開啟VBA視窗。

點取「插入 > 模組」指令，新增Module1模組。

輸入下列程序：

SUB TEST2751()

Dim folder As String

folder = "C:\PHOTO\2021\12"

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

END SUB

當按F5鍵，即自動在C磁碟建立PHOTO、PHOTO\2020與PHOTO\2020\12資料夾。

以上就是今天主要學習的知識點，希望對大家有所幫助~~有什麼問題歡迎留言，我會儘量及時的給大家答覆~~

更多相關影片教學：請點我

部落格相關範例

2021.12.12	2740Excel有條件的最大值及最小值-MAX(DMAX)、MIN(DMIN)
2021.12.11	2741Excel依關鍵字統計數值欄位計-SUMIF、SUMIFS
2021.12.10	2739將日期轉變為月份-MONTH、TEXT、CHOOSE
2021.12.09	2737文字內的數字加總但遇到空格會出錯
2021.12.08	2738Excel算出借頭巾跟帽子的人數
2021.12.07	2736統計同一時間同一時間的資料筆數-SUMPRODUC、TEXT
2021.12.06	2727資料輸入對話方塊並計算總和
2021.12.05	2724資料輸入對話方塊
2021.12.04	2723判斷使用者未輸入取消輸入資料
2021.12.03	2722自訂對話方塊
2021.12.02	2721InputBox資料輸入對話方塊
2021.12.01	2718Excel計算絕對值-ABS
2021.11.30	2714筆數統計-SUMPRODUCT
2021.11.29	2713搜尋比對填入值-SUMPRODUCT
2021.11.28	2711Execl雙日期的星期標示
2021.11.27	2710Execl儲存格擷取資料問題
2021.11.26	2705Excel如何在一個欄位同時滿足2個欄位在自動標色？