為什麼這篇excel vba複製檔案鄉民發文收入到精華區：因為在excel vba複製檔案這個討論話題中，有許多相關的文章在討論，這篇最有參考價值！作者alice1225 (Alice)看板Office標題[算表] 批次複製word檔內表格至exc...
軟體:excel
版本:2013
各位板友大家好。
我有一年份的word檔，檔名為「值」+日期，
例如107年1月1日的檔案為「值0101」，107年12月1日的檔案為「值1201」，
從「值0101」到「值1231」共365個word檔。
我想要複製最右邊那欄的表格(姓名以及當日假別)至excel製作資料庫，
以便建立每個人的休假紀錄。
因為重複複製貼上要花很多時間 QQ
想請問可以使用VBA操作嗎？
(爬文看到VBA，但是不太懂如何使用 > <)
請高手指點~~~
非常感謝~~~~~~~~
（word檔因當初設計不當，導致格式會跑掉，不知是否會影響匯入excel)
「值1201」檔案連結：
https://www.dropbox.com/s/366xippkzvm85bm/%E5%80%BC1201.docx?dl=0
「值1202」檔案連結：
https://www.dropbox.com/s/vwia9dk3if47jh1/%E5%80%BC1202.docx?dl=0
希望呈現的excel，檔案連結：
https://www.dropbox.com/s/oundcrno3vaimfp/%E5%8C%AF%E5%85%A5excel.xlsx?dl=0
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.140.13.119
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1546609518.A.166.html
※ 編輯: alice1225 (223.140.13.119), 01/04/2019 21:49:58
→ soyoso: 可以用vba操作，寫在excel內的話，先設個暫存工作表 01/04 22:53
→ soyoso: 新建word引用word.application 01/04 22:53
→ soyoso: 迴圈日期2018/1/1到208/12/31 01/04 22:54
→ soyoso: 2018/12/31 01/04 22:55
→ soyoso: 新增工作表sheets.add，更名以name指定迴圈的變數值 01/04 22:55
→ soyoso: 開啟word檔documents.open 完整路徑和完整檔名， 01/04 22:56
→ soyoso: 檔名以format迴圈變數值，格式mmdd，連接字串以& 01/04 22:56
→ soyoso: 複製document.tables.range.copy 01/04 22:56
→ soyoso: 以原文word檔來看，要抓取的table索引值為1 01/04 22:56
→ soyoso: 貼上暫存工作表內worksheet.pastespecial 01/04 22:57
→ soyoso: 如果貼上的表格都一致的話，就將K:L內指定範圍 01/04 22:57
→ soyoso: range.copy到新增工作表的儲存格a2處 01/04 22:57
→ soyoso: 最後document.close 01/04 22:57
→ alice1225: 非常感謝！！！希望第一次使用VBA能成功 >< 01/06 11:28