L
leerem
I'm haveing a problem with the following code to clear the contents of
controls on a UserForm.
Sub ClearForm()
Dim Ctl as Control
For Each Ctl in NewVehicle ' name of form
If TypeOf Ctl Is Textbox then
Ctl.Text =vbNullString
ElseIf TypeOf Ctl Is CheckBox then
Ctl.Value = UnChecked
ElseIf TypeOf Ctl Is ComboBox then
Ctl.ListIndex = -1
End if
Next Ctl
End Sub
This is all the Controls on the Form. But I get the Message " object doesn't
support this Property or method.
Do i need to list each and every control on the form ?
Regards
Lee
controls on a UserForm.
Sub ClearForm()
Dim Ctl as Control
For Each Ctl in NewVehicle ' name of form
If TypeOf Ctl Is Textbox then
Ctl.Text =vbNullString
ElseIf TypeOf Ctl Is CheckBox then
Ctl.Value = UnChecked
ElseIf TypeOf Ctl Is ComboBox then
Ctl.ListIndex = -1
End if
Next Ctl
End Sub
This is all the Controls on the Form. But I get the Message " object doesn't
support this Property or method.
Do i need to list each and every control on the form ?
Regards
Lee