Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen

Multiselected Listbox prüfen | Herbers Excel-Forum


Betrifft: Multiselected Listbox prüfen von: Gatz
Geschrieben am: 08.01.2012 23:51:58

Bezüglich von diesem Thread
https://www.herber.de/forum/archiv/1244to1248/t1245164.htm

Dim i, zeile As Long
zeile = .Cells(.Rows.Count, "G").End(xlUp).row + 1
For i = 0 To ListBox2.ListCount - 1
If ListBox2.Selected(i) = True Then
If .Cells(zeile, "G") = "" Then
.Cells(zeile, "G") = ListBox2.List(i)
Else
.Cells(zeile, "G") = .Cells(zeile, "G") & "," & ListBox2.List(i)
End If
Else
End If
Next


hab schon an jeder erdenklicher stelle probiert aber ich bekomme es nicht hin, das wenn nichts ausgewählt wurde, in der excel Tabelle "keine" eingetragen wird. :(

  

Betrifft: AW: Multiselected Listbox prüfen von: Dirk aus Dubai
Geschrieben am: 09.01.2012 08:26:23

Hallo!

Warum nimmst Du denn nicht den Vorschlag von HaJo?

(letzter Beitrag im Referenzierten Post)

Gruss

Dirk aus Dubai


Beiträge aus den Excel-Beispielen zum Thema "Multiselected Listbox prüfen"