To add on to this, you can use one macro to do both functions.

If ActiveSheet.Shapes("ComboBox1").Visible = False _
Then
ActiveSheet.Shapes("ComboBox1").Visible = True
Else:
ActiveSheet.Shapes("ComboBox1").Visible = False

End If


"Die_Another_Day" wrote in message
oups.com...
Eliminate the select as you can't select a non-visible item:
ActiveSheet.Shapes("ComboBox3").Visible = True

Charles Chickering

Troubled User wrote:
I need the syntax for hiding and showing a combo box in VB. I can get it
to
hide using:

ActiveSheet.Shapes("ComboBox3").Select
Selection.Visible = False

But when I try to use

ActiveSheet.Shapes("ComboBox3").Select
Selection.Visible = True

It won't let me see it (Get VB error). I think this is because I need to
turn on the Design Mode. Does anyone know the syntax to do that / solve
this problem. Thank you.