---

servus profis...

ich habe eine combobox1 bei der ich beim UserForm_Initialize zuerst alle einträge lösche und danach folgendermaßen befülle:

    combobox1.AddItem "erster eintrag"
    combobox1.AddItem "zweiter eintrag"
    combobox1.AddItem "dritter eintrag"

bis hier her klappt alles prima. jetzt möchte ich aber zusätzliche
spalteneinträge generieren. das geht wohl mit listindex. aber ich komm einfach nicht weiter.

wie müsste der code aussehen wenn ich folgendes "umgangssprachlich" haben möchte:

    combobox1.listindex(0).AddItem "erster eintrag"
    combobox1.listindex(0).AddItem "zweiter eintrag"
    ... usw.

    combobox1.listindex(1).AddItem "Nr. 1"
    combobox1.listindex(1).AddItem "Nr. 2"
    ... usw.

dank euch schon mal für eure hilfe

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
Verwende mal diesen Code:

Code:

---

    With ComboBox1
        .ColumnCount = 2
        .AddItem "erster eintrag"
        .List(.ListCount - 1, 1) = "Nr. 1"
        .AddItem "zweiter eintrag"
        .List(.ListCount - 1, 1) = "Nr. 2"
        .AddItem "dritter eintrag"
        .List(.ListCount - 1, 1) = "Nr. 3"
    End With

---

Zur Erklärung:
AddItem erzeugt immer eine neue Zeile und erhöht den ListCount um einen Zähler.
Normalerweise wird ein das Feld immer bei Null begonnen, weshalb ListCount-1 verwendet werden muß und Spalte 2 somit auch den Index 1 bekommt.

Wenn Du es wie in Deinem Beispiel machen wolltest:

Code:

---

    ' Erzeugen der Zeilen
    combobox1.AddItem "erster eintrag"
    combobox1.AddItem "zweiter eintrag"
    combobox1.AddItem "dritter eintrag"

    ' Füllen der Spalte 2
    combobox1.list(0,1) = "Nr. 1"
    combobox1.list(1,1) = "Nr. 2"
    ... usw.

---

[Edit] Noch ein Wort zur ListIndex-Eigenschaft: Diese gibt den Wert der ausgewählten Zeile wieder bzw. kann man damit auch eine bestimmte Zeile auswählen.

Grüße
Klaus  

[Diese Nachricht wurde von KlaK am 16. Apr. 2023 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

super, vielen dank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP