Hvordan skjuler man en combo box

Du kan fx læghge denne kode i arkets kodemoduk

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("e17")) Is Nothing Then
        If Target.Value = "x" Then
            drop down 46.Visible = True
            drop down 47.Visible = True
        Else
            drop down 46.Visible = False
            drop down 47.Visible = False
        End If
    End If
End Sub

Jeg får en syntax error fejl

Sandsynligvis i dinne navne? Jeg hjar skrevet det, du angav, men normalt er der ikke blanke i boxnavnene.

Nu har jeg omdøbt den til dropdown46, men får fejlen "object required".
I koden hedder den også dropdown46, så jeg forstår det ikke

Heller ikke jeg. Det virker fint hos mig. Kan du evt. sende regnearket?

Ok, hvad er din mailadresse

Send den til jan@kronsell.net så kigger jeg på den, men der går måske en times tid.

Det er ok, den er sendt

OK jeg ser på den, men jeg er lige i gang med noget andet. Jeg vender tilbage.

Probklemet ligger i, at du bruger elementer fra formularværktøjslinien. Disse kan ikke adresseres via VBA som selvstændige objekter. I min løsning gik jeg ud fra, at du havde anvendt kontrolelementer. Jeg er ikke helt klar over om formularelelenmter overhovedet kan gøres usynlige. Jeg kigger lidt nærmere på det.

Set cb = Shapes("drop down 46")
    cb.Visible = False

Det virker, smid et svar

Det får du.