删除工作表时出错。运行时错误1004：范围类的删除方法失败

Question

我正在尝试删除从列表框中选择的工作表。显示工作表名称的msgbox命令是正确的，但我似乎得到一个错误，如下所示：

运行时错误1004：删除范围类的方法失败。

这是我的代码。

If ListBox2.Selected(i) Then
        Worksheets(ListBox2.List(i)).Unprotect "asdf"
        Worksheets(ListBox2.List(i)).Delete
        MsgBox ListBox2.List(i)
        sht = ListBox2.List(i) + "_Graph"
        Worksheets(sht).Unprotect "asdf"
        MsgBox sht
        Worksheets(sht).Delete
        Worksheets("Report").Rows(ListBox2.ListIndex + 2).Delete
        MsgBox "KC " + ListBox2.List(i) + " Removed!"

    End If

Answer 1

试试这个：

Worksheets("Report").Rows(ListBox2.ListIndex + 2).EntireRow.Delete

而不是：

Worksheets("Report").Rows(ListBox2.ListIndex + 2).Delete

（倒数第二行）。