Drop down menu zichtbaar / onzichtbaar bij waarde van cel

[h3nkehv]

Hallo,

Bij een keuze van drop down menu 1 wordt de waarde van cel D23 1 of 2 omdat deze gekoppeld is.

Bij waarde 1 wordt een nieuw drop down menu Bekijk bijlage test 1.xlsxichtbaar, bij waarde 2 blijft deze onzichtbaar
Bij waarde 2 wordt een ander drop down menu zichtbaar, bij waarde 1 blijft deze onzichtbaar


Ik heb onderstaande VBA code gevonden op internet en wat om getweakt, volgens mij moet er nog een formule bij om hem te activeren maar ik weet zo niet welke dit is.



Range("D23").Select

If Selection.Value = 1 Then
ActiveSheet.Shapes("Drop Down 4").Visible = True
ElseIf Selection.Value = 2 Then
ActiveSheet.Shapes("Drop Down 4").Visible = False

If Selection.Value = 2 Then
ActiveSheet.Shapes("Drop Down 3").Visible = True
ElseIf Selection.Value = 1 Then
ActiveSheet.Shapes("Drop Down 3").Visible = False

End If
[A1].Select

End Sub


Kan iemand mij verder helpen hoe ik dit voor elkaar krijg? alvast bedankt!


Groetjes

 

[h3nkehv]

Volgens mij heeft hij mijn voorbeeld bestand niet geupload, bij deze poging 2.

 

[Cobbe]

Kijk eens of dit ook goed is.

 

[h3nkehv]

Dank voor uw antwoord, alleen er veranderd niets bij het wijzigen van een van de keuzes bij mij. Dit is niet echt de oplossing die ik zoek.

Hoe heeft u overigens dat keuze vakje (in de groene en oranje cel) gemaakt zodat hij de als platte waarde ziet?

 

[Cobbe]

Gewoon via Gegevens - Validatie - lijst

 

[h3nkehv]

Oké bedankt.

Zoals in mijn oorspronkelijke test bestand de tekst boven de 2 drop down menu's wel zichtbaar en onzichtbaar zijn bij een bepaalde keus zoek ik dit ook voor de drop down menu's onder de tekst.

 

[gast0660]

Is zoiets de bedoeling?

 

[gast0660]

Oops bestandje vergeten