Re: [問題] vba撈取指定工作表 MayKA PTT批踢踢實業坊

Re: [問題] vba撈取指定工作表

作者: MayKA 2022-12-07 12:22:07

調整後內容如圖
但執行結果變成把每個檔案中
第一個出現Sheet的指定範圍，重複貼上好幾次
其他sheet內容並未複製貼入
想詢問應如何調整寫法
謝謝
https://i.imgur.com/BAbSdSG.jpg
https://i.imgur.com/Tc508uD.jpg

作者: newacc (XD) 2022-12-07 12:50:00

跟上一篇推文相同，你沒有用到sht，也沒有設定誰要active所以只會一直對一開始active的工作表進行操作我建議跨工作表/檔案的狀況下，直接針對目標賦值就好也建議不要直接使用Range，標上父物件較明確也不容易出錯tgtWb.Worksheets([name]).Range([xxx])=sht.Range([xxx])之類的

作者: MayKA 2022-12-07 13:27:00

所以即使在end if後面寫next sht，也不會自動讓下一個工作表是activesheet，然後判斷A14格是否為1？

作者: newacc (XD) 2022-12-07 14:16:00

不會，Next sht只是讓excel知道該讓sht指向下一個工作表簡單的修正就是在迴圈最一開始加上sht.Activate

作者: MayKA 2022-12-07 18:12:00

感謝N大的建議，加那句後就執行成功了！

繼續閱讀

[算表] SUMIF公式和 VBA FindNext疑問sagwow [問題] excel 庫存及指定日期欠料問題a402154 請問EXCEL工作表出現小眼睛然後行跟列黑色ilf0121 [問題] excel下拉複製表單elephuck [文件] 合併列印後怎麼刪除分節符號?lgtenos [文件] 自動比對條文、論文、文章southknight [算表] 列與欄都需要lookup並且加總GuessMyHeart [問題] vba撈取指定工作表MayKA [問題] Outlook 365 行事曆(僅這台電腦)同步yosii 如何使用Vba貼上原始表格內容樣式到LOTUS NOTESbohemien