Anzeige
Archiv - Navigation
992to996
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
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Werte in ListBox kopieren

Werte in ListBox kopieren
16.07.2008 13:03:25
Josef
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

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte in ListBox kopieren
16.07.2008 13:49:00
Holger
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

AW: Werte in ListBox kopieren
17.07.2008 06:05:20
Josef
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

Anzeige
AW: Werte in ListBox kopieren
17.07.2008 15:30:30
Holger
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

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige