Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
548to552
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
548to552
548to552
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Listbox MultiSelect

Listbox MultiSelect
19.01.2005 14:34:28
Andre
Hallo,
Habe eine Listbox:
Multiselect = MultiSelectMulti
ListStyle = ListStyleOption
in Column(0) stehen die ID´s der Einträge!!!
Wie bekomme ich über einen Button(z.B. O.K.) die Ausgewahlen Einträge(ID´s) ins Tabellenblatt geschrieben?
hoffe Ihr könnt helfen!!!!
MFG
Andre

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Listbox MultiSelect
Heiko
Is zwar keine Listbox mit mehrern Spalten aber in dem Code werden alle gewählten Einträge ausgegeben.

Private Sub CommandButton2_Click()
Dim i As Integer
Dim Gewaehlt As Boolean
For i = 0 To LD_Dateien.ListCount - 1
If LD_Dateien.Selected(i) = True Then
Gewaehlt = True
End If
Next i
If Gewaehlt <> True Then
MsgBox "Bitte wählen Sie eine Datei aus ! ", vbCritical, " Achtung !"
Else
' Ausgabe der gewählten LD_Dateien Einträge
For i = 0 To LD_Dateien.ListCount - 1
If LD_Dateien.Selected(i) = True Then
MsgBox LD_Dateien.List(i)
End If
Next i
' Hier kann dann anstatt der Auawahlausgabe dein Code rein !!!
End If
End Sub

Vielleicht findest du darin eine Anregung um dein Prblem zu lösen.
Gruß Heiko
Anzeige
AW: Listbox MultiSelect
Andre
Funzt!!! ...THX.... :-))

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige