在VBA中使用工作表索引而不是名称

Question

我想从第一张工作表中复制一些内容，将它们粘贴到新工作表中，然后删除第一张工作表并将新的（仅）工作表重命名为Sheet1。但是我不知道第二张纸在创建时会被命名为什么。大多数时候，它将是Sheet2，但是我不能指望它。这是仅创建一个宏的代码，但是它使用的是在此实例中创建的工作表名称。我想改用工作表的索引，但不知道语法：

    Columns("A:D").Select
    Selection.Copy
    Sheets("Sheet2").Select
    ActiveSheet.Paste
    Sheets("Sheet1").Select
    Application.CutCopyMode = False
    ActiveWindow.SelectedSheets.Delete
    Sheets("Sheet2").Select
    Sheets("Sheet2").Name = "Sheet1"

所以在哪里说“ Sheet2” ...我该如何使用第二张纸，而不必使用名为Sheet2的纸？

谢谢。

Answer 1

Worksheets(2) 是引用第二张纸的方式。

Worksheets(Worksheets.Count) 到最后一个。

像这样尝试：

Debug.Print Worksheets(Worksheets.Count).name