[算表] VBA 將不同資料夾內同檔名的工作表合併

[tmac41103 (支持火箭,不離不棄)]

軟體: EXCEL

版本: 2013


不好意思想請教一個問題, 問題如下:

有N個資料夾,裡面都存有N個同檔名的檔案,

這樣的話用VBA的語法

要怎麼將不同資料夾內檔名一樣的檔案合併成一個檔呢?   謝謝

EX:

有三個資料夾分別為 A  B  C

而這三個資料夾中分別都存有 AA.xls和BB.xls這兩個檔案

然後現在要把在A B C三個資料夾中AA.xls內的工作表都合併成一個工作表,

也要把三個資料夾中BB.xls內的工作表都合併成一個工作表,

有辦法嗎?

問題有點複雜, 如有說明不清楚的地方請見諒, 謝謝



--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.185.89.93
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1496515709.A.3D0.html
※ 編輯: tmac41103 (111.185.89.93), 06/04/2017 02:49:49
→ soyoso: n個資料夾是於同一個目錄下，取得資料夾名稱可以
→ soyoso: scripting.filesystemobject迴圈於getfolder.subfolders
→ soyoso: 取以其中一個資料夾下不定數檔名為依據合併成一個活頁簿的
→ soyoso: 話，可以回文取得的資料夾名稱，迴圈於getfolder.files
→ soyoso: 或以取得的資料夾名稱，迴圈於dir
→ soyoso: 其他的動作如開檔workbook.open，如檔案內又有一個以上工
→ soyoso: 作表要複製的話，迴圈於sheets或worksheets內
→ soyoso: 複製range.copy、定位range.end、貼上worksheets.paste或
→ soyoso: range.pastespecial、關檔workbook.close
→ soyoso: 如為複製值的話可以range = range.value，定位另有range.
→ soyoso: find
→ tmac41103: 挖賽太猛了...  我再依據您給的提示研究一下, 感謝!!