How to close activeX combobox dropdown menu on spreadsheet?

[VBA_Cancer]

Hi All,

I made a searchable ActiveX combo box which works as intended.

I also added a button next to it called "Add" which searches a table for whatever value is in the combo box.

Once I click the search button, the combo box automatically pulls down the dropdown menu and the only way to close it is to click on the down arrow button on the combo box.

I tried to set focus on the add button after the search but it did not work.

Sub ComboBox1_Change()

'displays search results as user type in combobox
    ComboBox1.DropDown
    
End Sub

Private Sub Add_Click()


   <code to="" search="" the="" value="">
    

'clear the combo box that is linked to this cell
    Cells(4, 3) = ""


End Sub

</code>

 

[Yongle]

try replacing Combobox1_Change with this

Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    ComboBox1.DropDown
End Sub

 

[VBA_Cancer]

Thanks Yongle. the mouse hover is a clever implementation and works like a charm!