我有一张excel表,其中有一张名为 "sheet1"
的表格,我添加了一张名为 "secondsheet"
的新表格
ExcelApp.Worksheets.Add().Name = "secondSheet"
,如下所示:
ExcelApp.Worksheets("secondsheet").Move(After:=xlWorkBook.Worksheets(xlWorkBook.Worksheets.Count))
现在如何将第二张纸移到最后,因为它正在向“sheet1”添加前面
这就是我所做的但无法移动第二张
{{1}}
答案 0 :(得分:1)
获得所需内容(在VBA中)的正确语法是:
Sheets.Add After:=Sheets("sheet1")
ActiveSheet.Name = "secondSheet"
我总是首先在正确的位置创建工作表,然后重命名它。
答案 1 :(得分:0)
我终于解决了......上面的代码没有任何错误,但宣布工作簿让我脱掉了头发。
这就是我所做的:
Dim xlWorkBook As Excel.Workbook
xlWorkBook = ExcelApp.Workbooks.Add