Error 2042 using Application.Match to add item and update combobox list

Hi all

I have the following code that adds a new item to a combobox list

Please Login or Register  to view this content.

The list of Garage names is in sheet "Module Data". A new Garage name can be inserted in a Textbox "NewGarage".

The code successfully inserts a new name in alphabetical order.

However, if the new name is above the first alphabetically listed name, it gives an error (2042). The workround that I did was to put a dummy name "AAAAAAA" first in the list and the code works.

Can anyone suggest why this is so and what can be changed in the code to add the new name at the top?

Thanks

Match type 1 finds the largest value that is less than the search value. so if your search value is B and you are looking in data with a lowest value C it will not find any values less than the search value and will return an error. You just need some error handling for this:

Please Login or Register  to view this content.

Thanks yudlugar. Your suggestion did the trick. It works now.

Cheers