Anzeige
Archiv - Navigation
1768to1772
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
Listbox: ein Item selektiert?
08.07.2020 15:59:06
Klaus
Hallo Gemeinde,
ich möchte gerne überprüfen ob für eine Listbox in einer Userform (Me.lsbThemenfeld) auch ein Eintrag ausgewählt wurde. Wenn nicht hätte ich gerne eine Meldung.
Nachdem ich jetzt tausend und eine Variante ausprobiert habe, frage ich Euch.
Mein letzter Status ist:
If Me.lsbThemenfeld.Selected = Null Then
MsgBox "Bitte wählen Sie aus der Liste ein Themenfeld aus (anklicken)"
Exit Sub
End If
An anderer Stelle habe ich das mit lsbThemenfeld.SelectesItem = 0 gesehen. Aber selecteditem ist in meinem Katalog nicht enthalten.
Hat irgendwer einen Tipp? Ich nutze EXCEL 2010

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Listbox: ein Item selektiert?
08.07.2020 16:08:18
Daniel
Hi
es kommt darauf an, was für einen Auswahltyp du eingestellt hast.
bei SingleSelect kannst du einfach den ListIndex abfragen.
wenn nichts selektiert ist, ist dieser -1
bei einer Multiselect-Listbox musst du mit einer Schleife über alle Einträge laufen und das .Select abfragen.
Dieses kannst du einfach aufaddieren (nicht ausgewählt: 0, ausgewählt: -1):
for i = 0 to Listbox.ListCount - 1
x = x + Listbox.Selected(i)
Next
If x = 0 then …
Gruß Daniel
AW: Listbox: ein Item selektiert?
08.07.2020 16:12:54
onur
If Me.lsbThemenfeld.ListIndex = -1 Then DEINE MELDUNG
AW: Listbox: ein Item selektiert?
08.07.2020 16:16:11
Matthias
Moin!
Wie hast du den die Listbox eingestellt?
Wenn es single select ist, also nur ein Wert angeklicken kannst, reichte glaube ich:
If Me.lsbThemenfeld.listindex = -1 then 

Wenn du aber Multiselect eingestellt hast, musst du in einer Schleife alle Einträge durchlaufen und prüfen, ob sie ausgewählt wurden. Geht unegfähr so (ungetestet)
Dim ausgewählt As Boolean
ausgewählt = False
For i = 1 To Me.ListBox2.ListCount
If Me.ListBox2.Selected(i-1) = True Then
ausgewählt = True
Exit For
End If
Next
If ausgewählt = False Then

VG
Anzeige
AW: Listbox: ein Item selektiert?
08.07.2020 18:00:42
Klaus
ja ich habe nur ein Feld in der Listbox drinnen.
Vielen Dank für die Tipps.
Werde das heute nacht noch ausprobieren und dann noch ein Feed Back geben.
Liebe Gruße
Klaus

8 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige