宏VBA：我的代码出了什么问题？行删除

Question

如果A列中的任何单元格为空，我试图删除整行。

此代码也应仅在同一工作簿中的两个特定工作表上运行（即＆＃34; ATM SLA可用性报告＆＃34;＆＃34;事件报告＆＃34;）。

以下是我的代码。当我运行它时，它给出了运行时错误9。

Sub test()
    Worksheets("ATM SLA Availability Report").Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete shift:=xlUp
    Worksheets("Incident Report").Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete shift:=xlUp
End Sub

Answer 1

Run-Time error 9表示＆＃34;超出范围＆＃34;这意味着您试图引用工作表（或工作簿）中不存在的内容，可能是您的某个工作表名称拼写不正确。

我没有发现您的代码有任何问题，我自己对其进行了测试，并且对我来说效果很好。您可以通过单击＆＃34; Debug＆＃34;进一步检查代码在哪一行给出错误。当错误弹出时。