Use VBA code to display message if combobox selection not in list

[hurlbut777]

When using combo box to display drop-down list, users can actually type in
any value they want...not good for what I need. A feasible fix for this is
to verify that the value typed in the combo box is in a list...if it isn't
display a message that says Try Again.

Based on the list below, what would the VBA code look like that says if
combo box value is not in list then give error message?

List: Monday, Tuesday, Wednesday

[Dave Peterson]

Change the style of the combobox to fmStyleDropdownList (2).

hurlbut777 wrote:
>
> When using combo box to display drop-down list, users can actually type in
> any value they want...not good for what I need. A feasible fix for this is
> to verify that the value typed in the combo box is in a list...if it isn't
> display a message that says Try Again.
>
> Based on the list below, what would the VBA code look like that says if
> combo box value is not in list then give error message?
>
> List: Monday, Tuesday, Wednesday

--

Dave Peterson

[hurlbut777]

Other than converting the combobox to the form style...any help on the code
below?

Thanks

"Dave Peterson" wrote:

> Change the style of the combobox to fmStyleDropdownList (2).
>
> hurlbut777 wrote:
> >
> > When using combo box to display drop-down list, users can actually type in
> > any value they want...not good for what I need. A feasible fix for this is
> > to verify that the value typed in the combo box is in a list...if it isn't
> > display a message that says Try Again.
> >
> > Based on the list below, what would the VBA code look like that says if
> > combo box value is not in list then give error message?
> >
> > List: Monday, Tuesday, Wednesday
>
> --
>
> Dave Peterson
>

[TJS]

Hi,

It won''t convert the combobox. Just change its behavior.

But anyway, can use MatchRequired and then If MatchFound on change event.

TJ

[Dave Peterson]

dim myArr as Variant
myArr = array("Monday","Tuesday","Wednesday")

if iserror(application.match(me.combobox1.value,myarr,0)) then
'not a match, the board goes back
else
'do what you want
end if

But changing the .style is too easy to ignore.

hurlbut777 wrote:
>
> Other than converting the combobox to the form style...any help on the code
> below?
>
> Thanks
>
> "Dave Peterson" wrote:
>
> > Change the style of the combobox to fmStyleDropdownList (2).
> >
> > hurlbut777 wrote:
> > >
> > > When using combo box to display drop-down list, users can actually type in
> > > any value they want...not good for what I need. A feasible fix for this is
> > > to verify that the value typed in the combo box is in a list...if it isn't
> > > display a message that says Try Again.
> > >
> > > Based on the list below, what would the VBA code look like that says if
> > > combo box value is not in list then give error message?
> > >
> > > List: Monday, Tuesday, Wednesday
> >
> > --
> >
> > Dave Peterson
> >

--

Dave Peterson