Ein/Ausblenden von Txtb + labl nach comboboxauswah
23.09.2004 11:06:51
Txtb
ich habe in einer userform eine combobox
und eine textbox je nachdem welcher Eintrag inder Combobox gewählt wird
soll die Textbox ein bzw. ausgeblendet werden.
Folgenden Code habe ich dafür eingegeben:
Private Sub ComboBox1_Change() bzw. Click
If ComboBox1 = "g941203s" Then
Label10.Visible = False
TextBox13.Visible = False
elseif ComboBox1 = "g941406insta" Then
Label10.Visible = True
TextBox13.Visible = True
End If
End Sub
das Problem dabei ist das die Textbox + Label zwar ausgeschaltet werden aber
nach dem selektieren von g941406insta nicht wieder sichtbar werden. Wenn
auf die Stelle der unsichtbaren Textbox geklickt wird verschwindet die ganze Userform
nach dem nochmaligen Aufruf der userform ist dann auch die Textbox + Label zu sehen.
Kann jemand helfen
Gruß Uwe
Anzeige