Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1096to1100
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

ListItem löschen

ListItem löschen
gerwas
Hallo Weite Welt - mal wieder
habe bis jetzt das Archiv durchforstet aber keine befriedigende Antwort gefunden.
Hier meine Frage, wie kann ich aus einer ComboBox einen bestimmten Item löschen. Ich weiß von dem Item den Inhalt z.B. "Meier" , selbiger Item befindet sich in mehreren anderen ComboBoxen, aber an einer anderen Stelle, dh. der ListIndex ist unterschiedlich!
Hintergrund: ich habe sieben ComboBoxen, die anfänglich alle ein identische Liste von Name beinhalten. Wähle ich nun in einer der Listen einen Namen aus soll dieser aus den anderen Listen gelöscht werden, um Doppelauswahl zu verhindern.
Gruß Gerwas

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
ComboBoxen : Redundanzauswahl verhindern
27.08.2009 15:10:31
NoNet
Hallo Gerwas,
einen Ansatz kann ich Dir liefern, allerdings besteht dann das Problem, wenn man die Auswahl einer ComboBox ändert - der fehlende Eintrag wird nicht wieder in die anderen ComboBoxen ergänzt :
Private Sub ComboBox1_Change()
Dim intT As Integer
intT = 0
Do
If ComboBox2.List(intT) = ComboBox1.Value Then
ComboBox2.RemoveItem intT
intT = intT - 1
End If
intT = intT + 1
Loop Until intT >= ComboBox2.ListCount
End Sub
Gruß, NoNet
AW: ListItem löschen
27.08.2009 15:17:52
JogyB
Hi.
Mal als Beispiel:

Private Sub removeFromCombo(ByVal comboName As String, ByVal itemName As String)
Dim i As Long
With Me.Controls(comboName)
For i = .ListCount - 1 To 0 Step -1
If .List(i) = itemName Then
.RemoveItem i
End If
Next
End With
End Sub
Du mußt dem Sub den Namen der ComboBox als String übergeben, Du kannst es also ohne Veränderung für jede ComboBox verwenden. Es muss aber in den Code des UserForms.
Gruss, Jogy
Anzeige
AW: ListItem löschen
28.08.2009 11:01:39
gerwas
Dank euch beiden!
hat mit weitergeholfen.
Gruß Gerwas

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige