Hello. I attempted to attach the following code to a check box. I want to give the user the option to select individual items from a list box or if they click on the check box, they will be permitted to select multiple items. Does anyone know why this won't work properly.

[VBA] Private Sub mselect_AfterUpdate()

'If the user clicks on the check box then
If Me.mselect = True Then

'the forms list box titled "LstFindings" MultiSelect property will be set to Simple (1)
Me.LstFindings.MultiSelect = 1
Else

'or set to None (0)
Me.LstFindings.MultiSelect = 0

End If
End Sub[/VBA]

Thank you in advance for your help.