如果单元格为空，如何删除整行

Question

我有一个Excel，其中数据从范围A8（列）开始，其各自列中包含其他值。我已经尝试过但几次失败的代码将开始读取列A8的每个单元格中的值，如果找到一个没有值的单元格，它应该删除整行。请帮助

Answer 1

Tony 建议：

Sub ClearA()
    Dim N As Long, r1 As Range, r2 As Range
    N = Cells(Rows.Count, "A").End(xlUp).Row
    Set r1 = Range("A8:A" & N)
    Set r2 = Range("A:A").Cells.SpecialCells(xlCellTypeBlanks)
    Intersect(r1, r2).EntireRow.Delete
End Sub