dropdown ausblenden wenn
30.01.2013 00:19:15
EarnyToLearny
vorweg: alle Dropdown-Felder wurden über "Formular" erstellt.
In Tabelle 1 wähle ich aus einer Dropdownbox den Wert "ja" oder "nein".
In Tabelle 2 wird bei "ja" der Wert 1 und bei "nein" der Wert 0 in Zelle R26 eingetragen.
In Tabelle 2 befindet sich eine weitere Dropdownbox (Dropdown11) die bei Wert 1 angezeigt und bei Wert 0 ausgeblendet werden soll. dafür verwende ich folgendes:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Me.Shapes("Dropdown11").Visible = Range("R26") = 1
Application.ScreenUpdating = True
End Sub
Der Code steht in Tabelle 2. Es tut sich aber nix. Wird der Wert manuell von Hand eingetragen, dann geht das. Wo liegt hier der Fehler?
Vielen Dank für die Hilfe.
Gruß Werner