Need vba code: Partial search in combobox with name range

Hi everyone,

I have a combobox with ship names, added through the AddItem function.
Currently I have to type the exact match in the combobox to get to the ship name I am looking for.
Is there a way just to type a part of the ship name and it will show the ship name?
Example:
Ship name is King Admiral III, I enter Admiral in the combobox, King Admiral III will come up.
Thanks for your help.