excel - 如何使用目标范围删除 VBA 中的行

Question

我有一张工作表，我需要删除从 A3:M3 开始的行。他下面的所有行也应该被删除。我正在使用下面的代码，现在整行都是空的。

任何提示和技巧如何做到这一点？

For i = 3 To 10
    rws = "A" & i & ":" & "M" & i
    Range(rws).EntireRow.Delete
Next

标签： excelvba

Answer 1

请尝试下一个代码：

Sub deleteRowsOver3()
   Dim sh As Worksheet, lastR As Long
   
   Set sh = ActiveSheet
   lastR = sh.Range("A" & sh.rows.Count).End(xlUp).row
   sh.Range("A3:A" & lastR).EntireRow.Delete
End Sub