仅突出显示单元格时删除完整的行

Question

我选择了一个包含4个单元格的盒子。

如何删除所选单元格的整行？

Answer 1

使用默认选择器就足够了。

Selection.EntireRow.Delete

Answer 2

更改范围并尝试：

Option Explicit

Sub Test()

    Dim i As Long
    Dim rng As Range

    With ThisWorkbook.Worksheets("Sheet1")

        Set rng = .Range("A10:D20")

        For i = rng.Row + rng.Rows.Count - 1 To rng.Row Step -1
           Rows(i).EntireRow.Delete
        Next

    End With

End Sub