我也遇见了类似的问题，在解决这个问题的过程中，我发现我自己的问题是因为代码所在的工作簿是2003版的，而被合并的工作簿是2007版的，行数和列数不同导致move执行不了。把2003版的另存为2007版就搞定了，保存为“启用宏的工作簿”后就可以兼容2003和2007版本了
sheets()
括号内应该用编号或SHEET工作表名
如果
sheets(1) '第一个工作表
或者
sheets("sheet1")
或者
sheets(sheets.count) '最后一个工作表
ActiveSheet.Move After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count)
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024