通过Excel VBA命令按钮删除多行的步骤

我有一个excel表格，带有命令按钮，可以选择和删除一行。 只能删除第12行之后的行。以下是我的代码：-

Sub Button_delete_row()
If ActiveCell.Row > 12 Then
ActiveSheet.Unprotect "xxxx"
Rows(ActiveCell.Row).Delete
ActiveSheet.Protect "xxxx", True, True
End If
End Sub

使用上面的命令按钮中的代码，我可以通过单击鼠标高亮显示并删除来选择一行。

---

我的问题是，我想通过鼠标拖动高亮显示并单击命令按钮来选择多行以删除这些行。

也许可以使用以下方法

Selection.EntireRow.Delete

---

您可以选择多个单元格，单击按钮，关联的行将被删除。

是否可以使用以下选项

Selection.EntireRow.Delete

您可以选择多个单元格，单击按钮，关联的行将被删除