Thema: Werte in ListBox kopieren

Hallo!
Können gefundene Werte welche über eine Suche in einer Textbox in eine ListBox eingetragen werden, in der ListBox markiert und kopiert werden, um diese Werte dann in ein anderes Arbeitsblatt einzufügen?
Wie würde hier bitte eine VBA Lösung lauten?
Danke
Josef

Hallo Josef,
du musst die ListBox mit der Multiselect-Eigenschaft versehen.
Die markierten Einträge kannst du mit der Selected-Eigenschaft abfragen und in das andere Arbeitsblatt ausgeben:
for i=0 to listbox1.count-1
if listbox1.selected(i)=true then sheet("anderes Arbeitsblatt").cells(Zeile,Spalte)=listbox1.list(i)
next i
Viel Erfolg
Holger

Hallo Holger!
Danke für Deine Antwort. Habe es gerade getestet. Bekomme einen Fehlerhinweis bei count. (Eigenschaft wurde nicht gefunden. Der Eintrag in der ListBox wäre 4 spaltig.
Danke
Josef

Hallo Josef,
du hast leider Recht, man sollte nicht einfach aus dem Gedächtnis heraus schreiben:
for i=0 to listbox1.listcount-1
if listbox1.selected(i)=true then sheet("anderes Arbeitsblatt").cells(Zeile,Spalte)=listbox1.list(i, Spalte der ListBox)
next i
Gruß
Holger