combobox problem

[sunilpatel]

Hi all,

I have asked this before but cannot solve. Pleeeeeese help as months have
gone into this project and Excel crashes with data being lost !

Clicking on an object (picture), is used to make a combox visible and dot
dropdown is used in code to make the combobox list visible (ready for user
to select an item)
If a selection is made all is well, however if while the list is down, if
the user changes sheets (or clicks another object linked to a macro that
changes sheets), the combobox dissapers BUT the dropdownlist does not. It is
still visible on the screen eventhough the new sheet is now active.

the code below shows the effect, ie sheet1 has the combox (created using
control toolbox)

In short how can you make the combobox and dropdown list dissapear before
the sheet change takes effect.

Sub combodrop()
With ActiveSheet.ComboBox1
.Visible = True
.Clear
.AddItem "Test 1"
.AddItem "Test 2"
.AddItem "Test 3"
.DropDown
Sheets("Sheet2").Select '(this is what the user would in effect do)
End With
End Sub

Sunil