VBA：使用變量刪除行

Question

我想將行從2刪除到z（z> 2）。 我寫了兩種方法，但都沒有用。 我搜索了答案，但沒有找到解決方案。

'.Rows("2:" & z).Select  
.Range(Cells(2, 1), Cells(z, 10)).Select  
Selection.Delete Shift:=xlUp

先感謝您。

Answer 1

您需要指定要使用EntireRow選擇的行，因為您的范圍只有幾個單元格：

.Range(.Cells(2, 1), .Cells(z, 10)).EntireRow.Delete Shift:=xlUp

---

如果您直接使用Rows則可以使用更Rows ：

.Range(.Rows(2), .Rows(z)).Delete Shift:=xlUp

要么

.Rows("2:" & z).Delete Shift:=xlUp

Answer 2

您可以使用此簡單的一行來刪除所需的任何數量的行。

Rows("2:" & Z).Delete