软件: Excel
版本: 2016
想从A工作簿复制多个工作表，至B工作簿最后面的工作表后方开始贴上
写了一个循环出现错误
找了老半天才找到的错误如下
错误版本
Sheets(i).Copy After:=Workbooks(TargetFileName).Sheets(Sheets.Count)
OK版本
Sheets(i).Copy After:=Workbooks(TargetFileName).Sheets(1)
OK版本里的1换成2或3，都是OK的
虽说这样的工作表排序后面再改回来也行
可是还是想请教
为什么用 Sheets()里放 Sheets.Count 会出现错误
而改用数字就不会？
PS: 错误说明为 “执行阶段错误 '9' 阵列索引超出范围“

因为Sheets.Count回传的是A工作簿的Sheets.Count要改成Workbooks(TargetFileName).Sheets.Count

测试i大回文，将sheets.count改为workbooks(...).sheets.count https://i.imgur.com/kkZA8Wa.jpg 并无出现错误