PTT數位生活區 / Office

[算表] xls,xlsx等匯入

看板Office作者 (佩蒂吉他)時間9年前 (2017/02/03 16:55), 編輯推噓0(0推 0噓 16→)
留言16則, 2人參與, 最新討論串1/1
軟體:excel 版本:2007以上 範例檔案如下 https://drive.google.com/file/d/0BwCgrQhGgaw7OVN1SnFIVDNqQU0/view?usp=sharing 我有數十個excel檔案 副檔名有xls,xlsx 其中有些有加密 我想要匯入這些檔案 並依照各自檔名取工作表名稱貼上去 但遇到加密檔案可以跳出畫面要我輸入檔案密碼後繼續下去 我有找到一個範例檔案不知道怎麼修改 麻煩各位 感謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.34.252.11 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1486112141.A.72C.html
→
02/03 17:08, , 1F
先修改這方面 https://i.imgur.com/wBWeJqC
02/03 17:08, 1F
→
02/03 17:27, , 2F
另外如果該巨集檔案和其他要匯入檔案在同個目錄下，巨集檔
02/03 17:27, 2F
→
02/03 17:28, , 3F
案的排除，和以檔名為工作表名稱及要匯入檔案停止運算、更
02/03 17:28, 3F
→
02/03 17:28, , 4F
新、事件、警示等 https://i.imgur.com/4whkdSd
02/03 17:28, 4F
→
02/03 17:29, , 5F
加上貼上後，匯入檔案的關閉
02/03 17:29, 5F
→
02/03 17:33, , 6F
如同檔名而不同副檔名上，則請再調整如worksheet.name則以
02/03 17:33, 6F
→
02/03 17:33, , 7F
變數openfile來命名
02/03 17:33, 7F
→
02/03 17:37, , 8F
原巨集內為開啟檔案將activesheet複製，貼上於巨集檔案內
02/03 17:37, 8F
→
02/03 17:38, , 9F
如果還要將開啟的檔案內全部工作表(迴圈)或有資料的工作表
02/03 17:38, 9F
→
02/03 17:38, , 10F
(迴判和判斷)的話，再請調整
02/03 17:38, 10F
→
02/03 17:44, , 11F
除range.copy和sheets.add外，另可以sheets.copy的方式
02/03 17:44, 11F
→
02/03 23:12, , 12F
哇 感謝大大 我上班日研究看看 有問題再來請教
02/03 23:12, 12F
→
02/06 10:56, , 13F
那想再問如果遇到密碼輸入錯誤要跳過這個檔案繼續要怎麼
02/06 10:56, 13F
→
02/06 10:56, , 14F
寫..
02/06 10:56, 14F
→
02/06 12:02, , 15F
於迴圈上方加上on error resume next
02/06 12:02, 15F
→
02/06 13:38, , 16F
可以了 感謝大大!!
02/06 13:38, 16F
‣ 更多 ptguitar 的文章
文章代碼(AID): #1Ob4MDSi (Office)
Office 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 ptguitar 的文章
文章代碼(AID): #1Ob4MDSi (Office)