Userform ComboBox Issue - Invalid Property Value

Hi All,

I have an issue when trying to 'undo' last selection on a userform, when attempting to set the ListIndex of the last populated combobox to -1, when .MatchRequired = true.

The basic steps are:


1.Select item in ComboBox1 (BeforeUpdate copies ListIndex to the .Tag property to store as 'previous value'. ComboBox1 is then locked, ComboBox2 is then unlocked, focus moved to ComboBox2)
2.Click on 'Undo' CommandButton (ComboBox2 is locked, ComboBox1 unlocked and ListIndex set to -1 if .Tag = vbnullstring or "")
3.Invalid Property message is displayed

I understand this is because -1 is not actually a value in the list to which MatchRequired refers. Is there a fix or valid workaround instead of adding "" as a ListItem.

Thanks in advance

Steve

Hi Norie,

It would be misleading for me to say Yes, when in fact the correct answer would be 'the user MUST be restricted to selecting a valid item from the ComboBox list', as subsequent ComboBoxes are dependent upon prior selections (they build SQL code with criteria to extract transactions from a datawarehouse). So in the absence of a fix where I can still use MatchRequired=True, I will set to false and add code to validate ListIndex selection is > -1. Not sure where at the moment as.....

I have a ComboBox class module to handle the events, plus another Control class module to handle the events not available in the ComboBox class (eg OnEnter, OnBeforeUpdate, OnAfterUpdate & OnExit). I've only just looked at this and cannot get the OnBeforeUpdate to accept the argument "ByVal Cancel As MSForms.ReturnBoolean", though will look at the Change or Click events.

I'll update when I've got it working. Thanks

Solved by setting MatchRequired = false, then check the value exists in the controls listindex, in it's BeforeUpdate event, cancelling the update if not.

I couldn't get the cancel argument to work in the class (though I'm a novice with classes really) so used a standard control event in the Userform module.