Listbox-Mehrfachauswahl

Forumthread: Listbox-Mehrfachauswahl
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Listbox-Mehrfachauswahl

27.11.2003 20:57:41

Ralf Sandhagen

Guten Abend ,
auch wenn für die meisten von euch zu trivial,hilft mir bitte jemand ?

Ich habe in Sheet1 die Texte von Zelle A1 bis A4 (oder größer) in einer Listbox stehen.
In der Zelle A1 steht "Markierung löschen".
Die Listbox hat Mehrfachauswahl.Wie kann ich die markierten Einträge(Texte) in Sheet2
in Zellen B1 bis Bx eintragen.
Wenn ich "Markierung löschen" anklicke sollen nur die Markierungen der Listbox
zurückgesetzt werden.
Eine Beispieldatei mit Apfel Birne Gurke usw. würde mir am besten helfen zum nachvollziehen.

Vielen Dank
Gruss
Ralf

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Listbox-Mehrfachauswahl

28.11.2003 00:23:22

G.Dietrich

AW: Listbox-Mehrfachauswahl

28.11.2003 00:23:22

G.Dietrich

Hallo Ralf,


Sub Markierungen_löschen()
Dim d() As Variant
Dim i As Integer
With DialogSheets("Versuch").ListBoxes(1)
ReDim d(1 To .ListCount)
For i = 1 To .ListCount
d(i) = False
Next
.Selected = d
End With
End Sub

Vielleicht kannst Du mit dieser Routine etwas anfangen.

Mit freundlichen Gruß

Gerhard

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!