Question

Excel方法“move”作用于对象“sheets”失败怎么解决啊？

我想把几个工作薄合在一起，这个也是借鉴别人的代码，但是出现这个错误是为什么呢？
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
这个函数出错

Answer 1

我也遇见了类似的问题，在解决这个问题的过程中，我发现我自己的问题是因为代码所在的工作簿是2003版的，而被合并的工作簿是2007版的，行数和列数不同导致move执行不了。把2003版的另存为2007版就搞定了，保存为“启用宏的工作簿”后就可以兼容2003和2007版本了

Answer 2

sheets()
括号内应该用编号或SHEET工作表名
如果
sheets(1) '第一个工作表

或者
sheets("sheet1")
或者
sheets(sheets.count) '最后一个工作表

Answer 3

ActiveSheet.Move After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count)