Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe

Forumthread: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe

ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 00:49:14
klabodo
Hallo,
ich stehe vor einem Rätsel. In meiner ersten erstellten Userform1 befinden sich zwei Kombinationsfelder: cboHK und cboTN.
In cboHK lese ich Werte über eine Schleife ein: HK 1 ... HK 9.
In cboTN (2-spaltig) befinden sich die Werte Range("A2:B104").Value aus einer Tabelle.
Nutze ich in Private Sub UserForm_Initialize() den Listindex für die beiden Felder, dann erscheint in beiden Feldern derselbe Inhalt (hier "HK 1").
Was muss ich ändern, um den jeweils 1. Eintrag im jeweiligen Feld einzustellen? Beispiel: cboHK = HK 1 und cboTN = Mustermann.

Gruß Klaus
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 01:07:56
ralf_b
zeig mal den Code.
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 09:03:29
Alwin Weisangler
Hallo Klaus,

ich vermute mal in der 2 spaltigen Combobox hast du vergessen die Ausgabe aus der Liste der gewünschten Spalte zuzuordnen.
Dies kann man in der .TextColumn Eigenschaft einstellen. Standarteinstellung ist -1.
Diese änderst du auf die in deiner gewünschten Ausgabe 2.

Gruß Uwe
Anzeige
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 10:04:11
RPP63
Moin!
Dies funktioniert bei mir mit einer Testdatei (die eigentlich Du hochladen solltest):
Private Sub UserForm_Initialize()

With cboHK
.List = [text(row(1:9),"AK 0")]
.ListIndex = 0
End With
With cboTN
.List = Tabelle2.Range("A2: B21").Value
.ListIndex = 0
End With
End Sub

Der ListIndex 0 holt den ersten Wert in die cbo.
Bedenke, dass dort nur der Inhalt der ersten Spalte angezeigt wird!

Gruß Ralf
Anzeige
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 13:07:28
Klaus B aus D
Guten Tag,

ich komme erst jetzt dazu, den gewünschten Code hochzuladen. Er unterscheidet sich zum Code von Ralf nur an den Bezügen auf die Userform.
Ich kann folgendes beobachten: Lasse ich in beiden Code-Blöcken .ListIndex = 0 bestehen, dann erscheint in beiden Komboboxen auf dem Formular eine "1". Das liegt am 1. Eintrag in der TN-Liste, in der die beiden Spalten mit einer ID (hier "1") und einem Namen gefüllt sind.
Kommentiere ich den Ausdruck .ListIndex = 0 im unteren Teil des Codes einfach aus, so dass er nicht mehr berücksichtigt wird, dann erscheint in beiden Komboboxen auf dem Formular der Eintrag "HK 1".

Private Sub UserForm_Initialize()


' Einträge für das Auswahlfeld "Hauptkontrolle"

Dim i As Integer

With UserForm1.cboHK
For i = 1 To 9 ' es gibt 9 Hauptkontrollpunkte
.AddItem "HK " & CStr(i)
Next
.ListIndex = 0
End With

' Einträge für das (2-spaltige) Auswahlfeld "Teilnehmer"

With UserForm1.cboTN
.ColumnCount = 2
.ColumnHeads = False
.List = Worksheets("Teilnehmer").Range("A2:B104").Value
.ListIndex = 0
End With

End Sub


Gruß Klaus
Anzeige
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 13:25:50
Klaus B aus D
Hallo,

ich kann das Thema jetzt beenden, da ich auch nach dem Verwenden des Codes von Ralf den bereits bekannten Fehler erhielt.
Schuld waren die selben Einträge "HK1" als ControlSource in beiden Komboboxen! Wo sie herkamen, weiß ich leider nicht.

Danke an alle Mitdenkenden.
Gruß Klaus
Anzeige
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 13:19:34
ralf_b
hast du den Combobox.value wert in den Eigenschaften vielleicht vorbelegt oder irgend ein Change-Event programmiert? Listindex=0 löst ein Click-Ereignis und ein Change Ereignis aus. Deshalb setzt ich sowas eher im Userform.Activate weil da das Initialize durch ist. Sind deine Comboboxen von einander abhängig, reicht auch nur ein Listindex=0. und zwar das von der ersten Combobox.

zur Kontrolle was in deiner Liste steht ,kannst du ja erstmal einen Haltepunkt setzen im Initialize nach den Zuweisungen und wenn der Debugger dann dort hält, holst du dir die cboTN.list in das Überwachungsfenster. Oder ohne .list und schaust dir dein Control mal genauer an.
Anzeige
AW: ComboBox.ListIndex zeigt gleiche Inhalte in 2 untersch. Boxe
09.11.2024 09:49:44
Alwin Weisangler
ach ja, eins habe ich noch vergessen.
Willst du den Value der Combobox abweichend vom angezeigten Wert nach Auswahl der Liste ausgeben, dann stellt man dies in der ColumnBound Eigenschaft ein.

Gruß Uwe
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige