VBA如何自動建立資料夾（上）

網誌圖文版：

http://www.b88104069.com/archives/4190

會計人的工作節奏：月初，十萬火急結帳，月中，喘一口氣，編製管理報表，到了月末，
又開始緊張兮兮地準備結帳。誠如會計原則中的期間假設，在事務所，日子是每一季每一
年地過，在業界會計課，日子是每個月每一年的過。這樣累積經驗起來，一個善於收納管
理的會計人，電腦裡面一定是以期間為單位，每個期間一個資料夾，裡面分門別類各個子
資料夾和檔案（十之八九是Excel）。因此開始一個新期間循環，首要步驟便是建立新資
料夾，而像這個周而復始的動作，便有自動化提升效率的空間，以下介紹VBA如何建立資
料夾：

一、「2017」年「Q1」季「1703」資料夾裡，有「成本」、「固資」、「費用」、「應付
」、「應收」五個子資料夾。

二、到了五月初開始結四月帳，依序新增「Q2」、「1704」，然後是上一步驟那五個資料
夾。

三、用VBA指令建立資料夾之前，必須先確認路徑，方法之一是「檔案」、「資料」，然
後在名稱下面直接「複製」路徑，如圖所示。

四、「Alt+F11」快速組合鍵直接進入VBA編輯環境，輸入VBA程式：「MkDir
"C:\Users\b88104069-Air\Desktop\2017\Q2\1704\成本」，意思是在這個位置新增「成
本」資料夾。老一輩會計人（我），有經歷過微軟黑壓壓的DOS上古時期，可能會記得「
MkDir」就是新增目錄的DOS命令。

五、在VBA編輯環境直接快速鍵「F5」執行程式，然後切到檔案總管，可以看到一個新的
「成本」資料夾！

六、先前是用「檔案」、「資料」取得路徑，如果Excel檔案所在位置，剛好是想新增資
料夾的地方，也可以用「ActiveWorkbook.path」方法取得路徑，如圖所示，其中有個VBA
函數「CStr」，作用是將所含對象轉換為字串，其餘程式皆有有綠色註解加以說明。

七、再次切到檔案總管，已然新增一個「固資」資料夾！

這篇是接續VBA系列的文章。在寫Excel的時候，我儘量和實際操作過程一致，一個步驟一
個步驟圖文說明清楚。相較而言，VBA在進入編輯環境、使用各個模塊、甚至是執行程式
本身，便需要兩三個操作步驟，這些步驟在我先前VBA文章已經說明過了，所以如同這篇
文章所示，那些類似於「開機／啟動」的動作會以文字略過，或者直接以快速鍵「
Alt+F11」開啟 VBA編輯、「F5」執行等方式帶過。讀者如果有不太清楚的地方，可以參
考先前的VBA文章。然後最好的方案是，贊贊小屋預計在下半年會再出版一本《會計人的
Excel VBA小教室》，建議讀者買一本書在手邊，把VBA基本流程做個書籤記錄，久而久之
，一定會很熟悉VBA的操作，進入Excel比一般人強的境界。


延伸閱讀：

VBA如何另存檔案備份

http://www.b88104069.com/archives/4149

VBA如何定期自動儲存檔案

http://www.b88104069.com/archives/4148

VBA如何整理程式代碼

http://www.b88104069.com/archives/4157

--


周末，我們繼續Excel：精華區=>21.心得=>5.其他=>3.office

會計人的Excel小教室： https://www.facebook.com/acctexcel


--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 112.20.96.248
※ 文章網址: https://www.ptt.cc/bbs/Accounting/M.1492689475.A.003.html
※ 編輯: moodyblue (112.20.96.248), 04/20/2017 20:39:11