我有一张工作表,需要删除从A3:M3开始的行。他下面的所有行也应该被删除。我正在使用下面的代码,现在整行都是空的。
有什么技巧和窍门吗?
For i = 3 To 10
rws = "A" & i & ":" & "M" & i
Range(rws).EntireRow.Delete
Next
请尝试下一个代码:
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