Reset Multicolumn Combobox

B

bymarce

I have filter form based on Allen Browne's example. Thanks Allen!! I
recently added a unbound filter combobox with 3 columns. When I click the
reset button I get an error "Can't assign value to this object." Previously
this worked. Here's the code. The line "ctl.value = null" is highlighted.
Thanks.
Public Function Reset(FormName As Form)
Dim ctl As Control, i As Integer
For Each ctl In FormName.Section(acHeader).Controls
Select Case ctl.ControlType
Case acTextBox, acComboBox
ctl.Value = Null
Case acCheckBox
ctl.Value = False
Case acListBox
For i = 0 To ctl.ListCount - 1
ctl.Selected(i) = False
Next i

End Select
Next
FormName.FilterOn = False
End Function
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Problem with search form 1
Reset value to False in Checkbox when closing form 1
Get the sum of Filtered form 0
Resetting default values on forms 2
Need help with Allen Browne search form. 3
cycle through controls to get value 2
Filter on subform using unbound text box 9
How t o reference a specific control from a function 1

Top