Tag: 重置用户

excel vba清除用户表单中的所有refedit控件

我需要添加一个重置button到我在EXCEL VBA中工作的用户表单。 我有下面的代码，大部分的工作，但是，我还没有想出如何清除refedit控件。 这是我迄今为止： === 'Reset Button Private Sub CommandButton2_Click() For Each ctrl In Me.Controls Select Case TypeName(ctrl) Case "TextBox" ctrl.Text = "" Case "ComboBox" ctrl.ListIndex = -1 Case "OptionButton", "CheckBox" ctrl.Value = False Case "ListBox" For i = 0 To ctrl.ListCount – 1 If ctrl.Selected(i) Then ctrl.Selected(i) = False End If Next i End […]