Halllo Zusammen,
habe mal wieder ein Problem... :05:
Aber bin schon am Endspurt
Hier zunächst mal mein Code:
Folgendes Szenarion:
ob_1985, ob_2110, ob_2235 und ob_th_sondermas sind Optionsfelder
cbo_th_sondermas ist eine ComboBox.
Wenn ich auf ob_th_sondermas in meiner userform klicke, soll die Liste welche unter Array steht angezeigt werden, das funktioniert auch einwandfrei.
Wenn ich jetzt aber z.b. auf das Optionsfeld ob_2110 klicke, sollte sich der Inhalt aus der Combobox cbo_th_sondermas automatisch löschen.
Das wollte ich mit der Case Else Funktion cbo_th_sondermas.Clear regeln.
Nur bleibt leider der Inhalt in der ComboBox stehen auch wenn ich schon ein ganz anderes Optionsfeld angeklickt habe.
Hatte vergessen zu erwähnen...
Nachdem ich z.b. das Optionsfeld ob_1985 geklickt habe, bleibt der Inhalt in der Combobox weiter stehen.
Aber sobald ich dann nochmals auf die Combobox klicke, kann ich nichts mehr auswählen, wie es auch richtig ist und der Inhalt is verschwunden.
Nur ich will eben, dass der Inhalt der Combobox sich zeitgleich mit dem Klick auf das Optionsfeld löscht.
Vielleicht habt ihr für mich eine Lösung, wie sich der Inhalt aus meiner Combobox löscht.
Vielen Dank im Voraus
habe mal wieder ein Problem... :05:
Aber bin schon am Endspurt
Hier zunächst mal mein Code:
Code:
Private Sub cbo_th_sondermas_DropButtonClick()
Select Case -Unico & -Syntesis & -Trockenbau & -Massivwand & -ob_1985 & -ob_2110 & -ob_2235 & -ob_th_sondermas & cbo_sonderelement
Case Is = "10100001" & ""
cbo_th_sondermas.List = Array("510 - 2610")
Case Is = "10010001" & ""
cbo_th_sondermas.List = Array("510 - 2610", "2611 - 2910")
Case Is = "10100001" & "Luce"
cbo_th_sondermas.List = Array("1010 - 2610")
Case Is = "10010001" & "Luce"
cbo_th_sondermas.List = Array("1010 - 2610")
Case Is = "01100001" & "Luce"
cbo_th_sondermas.List = Array("992 - 2692")
Case Is = "01010001" & "Luce"
cbo_th_sondermas.List = Array("992 - 2692")
Case Is = "10100001" & "Unilaterale"
cbo_th_sondermas.List = Array("1010 - 2610")
Case Is = "10010001" & "Unilaterale"
cbo_th_sondermas.List = Array("1010 - 2610")
Case Is = "01100001" & ""
cbo_th_sondermas.List = Array("992 - 2692")
Case Is = "01010001" & ""
cbo_th_sondermas.List = Array("992 - 2692")
Case Else
cbo_th_sondermas.Clear
End Select
End Sub
Folgendes Szenarion:
ob_1985, ob_2110, ob_2235 und ob_th_sondermas sind Optionsfelder
cbo_th_sondermas ist eine ComboBox.
Wenn ich auf ob_th_sondermas in meiner userform klicke, soll die Liste welche unter Array steht angezeigt werden, das funktioniert auch einwandfrei.
Wenn ich jetzt aber z.b. auf das Optionsfeld ob_2110 klicke, sollte sich der Inhalt aus der Combobox cbo_th_sondermas automatisch löschen.
Das wollte ich mit der Case Else Funktion cbo_th_sondermas.Clear regeln.
Nur bleibt leider der Inhalt in der ComboBox stehen auch wenn ich schon ein ganz anderes Optionsfeld angeklickt habe.
Hatte vergessen zu erwähnen...
Nachdem ich z.b. das Optionsfeld ob_1985 geklickt habe, bleibt der Inhalt in der Combobox weiter stehen.
Aber sobald ich dann nochmals auf die Combobox klicke, kann ich nichts mehr auswählen, wie es auch richtig ist und der Inhalt is verschwunden.
Nur ich will eben, dass der Inhalt der Combobox sich zeitgleich mit dem Klick auf das Optionsfeld löscht.
Vielleicht habt ihr für mich eine Lösung, wie sich der Inhalt aus meiner Combobox löscht.
Vielen Dank im Voraus