如何一次將多個Excel檔案copy到一個檔案內

之前用Sendkey寫了一篇如何合併多個相同的Excel檔案，發現有些缺點，無法一次用很多檔案，因為這個功能很多人都會用到，因此我把它改寫，改成開啟檔案沒有限制，只要把開啟的檔案名稱都寫在一起，中間不要有空白，程式會自動把所有的檔案都copy到一個空白檔案。

練習檔案:

http://f272586.googlepages.com/merger01.xls

http://f272586.googlepages.com/merger02.xls

http://f272586.googlepages.com/merger03.xls

http://f272586.googlepages.com/mergeradv.xls

2009/2/3新增功能

可以加入副檔名,且不用開新檔,合併以後會排序,如果重覆會自動去除

http://f272586.googlepages.com/mergeradv1.xls

2009/2/19新增功能 加入可以指定合併活頁名稱,加入判斷如果貼上於65535則會自動新增活頁貼上

去除合併會排序及重覆自動去除功能

http://f272586.googlepages.com/mergeradv2.xls

2009/5/5新增功能

加入第一列可以加入檔案名稱的選項

http://f272586.googlepages.com/mergeradv3.xls

1. 下載四個練習檔，把它們放在一起，執行mergeradv.xls

 2. 出現安全性警告，請按啟用巨集

3. 開啟一個空白檔案，並把該檔案名稱寫在儲存格B1 儲存檔B2下面，可以寫您要合併的檔案名稱(.xls副檔案名稱可以不用寫)

4. 這是合併後的檔案

5. 程式碼一覽