Listindex
22.04.2015 05:11:12
Oliver
hier meine erste Frage im Forum.
Ich habe eine Userform auf der mehrere Comboboxen sind. Wenn ich die Userform aufrufe sind in der CB leider keine Werte enthalten. Es soll jeweils der letze ausgewählte Wert angezeigt werden. Die Userform kann dabei geschlossen werden und Excel ebenfalls.
Auf meiner Suche im Forum bin ich auf folgende Lösung gekommen.
in ein allgemeines Modul (z.B. Modul1) an den Anfang, außerhalb aller Prozeduren:
Public p_listindex As Integer
und dann ins Modul der UserForm:
Private Sub ComboBox12_Change()
p_listindex = ComboBox12.ListIndex
End Sub
Dann kannst du in deiner UserForm_Initialize()-Prozedur nach der Initialisierung den letzten IndexWert setzen:
ComboBox12.ListIndex = p_listindex
Wie kann ich nun diese Lösung auf mehrere Comboboxen anwenden damit jeweils der letzte Wert angezeigt wird? Dabei kann in jeder CB ein anderer Wert angwählt worden sein. Gibt es eine Möglichkeit ?
Mit der Bitte um Hilfe...
Anzeige