使用UserForm删除行

Question

我已经使用UserForm构建了一个简单的Combobox来按名称删除行。

• 我使用宏来填充Combobox rowsource来构建一个 命名范围称为“Combo_List”。我静静插入了 rowsource属性（意思是，我没有使用代码执行此操作）。
• 同样在UserForm上的是Checkbox，我想将其用于确认目的。
• 一旦他们从列表中选择了用户名，他们需要检查Checkbox，然后他们可以点击删除按钮。

我不知道如何编写验证Checkbox的代码，然后删除所选行。

如果有帮助，这里是构建命名范围的代码，然后显示UserForm：

Sub RecordDelete()

Dim LastRow As Long
ActiveSheet.Select

LastRow = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row 
Range("B3:B" & LastRow).Name = "Combo_List" 
frmDeleteData.Show

End Sub

该复选框名为'checkbox1'。有什么帮助吗？

Answer 1

一种方法是

1. 在设计模式下将删除Enabled的{​​{1}}的默认属性设置为CommandButton
2. 添加代码False，在CheckBox被勾选后启用CommandButton
3. 将代码添加到删除Checkbox以删除整行

<强>码

CommandButton