通过 Excel VBA 命令按钮删除多行答案

【问题标题】：To delete multiple rows by Excel VBA command button通过 Excel VBA 命令按钮删除多行
【发布时间】：2017-05-03 23:35:50
【问题描述】：

我有一个带有命令按钮的 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

在命令按钮中使用上面的代码，我可以通过单击鼠标突出显示并删除来只选择一行。我的问题是我想通过鼠标拖动突出显示并单击命令按钮来删除这些行来选择多行。

【问题讨论】：

标签： excel vba

【解决方案1】：

也许使用以下？

Selection.EntireRow.Delete

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

【讨论】：