Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

ListBox

Forumthread: ListBox

ListBox
17.11.2006 08:59:08
Thomas
Guten Morgen zusammen,
ich habe ein kleines Script um mir Daten aus einer Tabelle in eine Listbox zu ziehen.
Die Spalten mit Überschrift sind:
A - Fortlaufenden Nr.
B - X Text
Die Spalten A-G sollen in der ListBox gezeigt werden.
Mit dem Script wird die Spalte A in der Listbox nicht angezeigt. Was kann ich anpassen damit doe Spalte gezeigt wird?
lz = .Cells(65536, 1).End(xlUp).Row
ListBox1.RowSource = .Range("A2:G" & lz).Address(External:=True)
ListBox1.ColumnHeads = True
Besten Dank im voraus.
Gruß
Thomas
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ListBox
17.11.2006 09:15:08
Bert
Hallo Thomas,
versuchs doch mal mit dem Code:
Dim Spalte As Integer
With Sheets("Tabelle1")
Userform1.ListBox1.Clear
Zeile = 2
Spalte = 3
Do Until Spalte = 8
Userform1.ListBox1.AddItem .Cells(Zeile, Spalte)
Spalte = Spalte + 1
Loop
End With
mit ListBox's habe ich leider auch meine Probleme, hoffe daher, dass es klappt
Gruß Berg
Anzeige
AW: ListBox
17.11.2006 09:48:12
Thomas
Hallo Bert,
erst einmal besten Dank für die Antwort.
Ich habe den Code an meine Tabelle angepaßt, es wird alledings nichts angezeigt.
Hier noch einmal der complette Code inkluse der Sortierung. Sortierung, damit die zuletzt eingegebenen Daten zuerst in der Liste stehen.
Worksheets("Nacharbeit").Activate
Cells.Select
Selection.Sort Key1:=Range("A2"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Dim Spalte As Integer
With Sheets("Nacharbeit")
UserForm3.ListBox1.Clear
Zeile = 2
Spalte = 3
Do Until Spalte = 8
UserForm3.ListBox1.AddItem .Cells(Zeile, Spalte)
Spalte = Spalte + 1
Loop
End With
Anzeige
AW: ListBox
17.11.2006 10:26:03
Bert
Hallo Thomas,
willst du nun NUR die Daten aus der Zeile A in die Listbox einlesen?
Gruß Bert
AW: ListBox
17.11.2006 10:29:16
Thomas
Hallo Bert,
ich möchte die Spalten A bis G einfügen
Nur A wird mir Zurzeit nicht angezeigt.
AW: ListBox
17.11.2006 10:28:41
Peter
Hallo Thomas,
versuch es mal so:
https://www.herber.de/bbs/user/38261.xls
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
Frage noch offen?
17.11.2006 10:36:47
Bert
Hi Thomas,
wie gesagt, ich habe selbst keine Erfahrung mit ListBox's...
nachdem ich mir deine Datei angesehen hatte, ist mir ein Licht aufgegangen,
also mir hat's geholfen, ich hoffe dem Thomas auch?
Gruß Bert
Korrektur
17.11.2006 10:37:57
Bert
ich meinte Peters Datei
AW: ListBox
17.11.2006 10:46:42
Thomas
Hallo Peter,
leider wird Spalte 1 immer noch nicht angezeigt. Ansonsten funktioniert daer Code.
Gruß
Thomas
Anzeige
AW: ListBox
17.11.2006 10:53:02
Bert
Hallo Thomas,
also bei der Datei von Peter werden bei mir alle Spalten (A-G) und alle Zeilen(1-4), in denen ein Text vorhanden ist angezeigt.
Gruß, Bert
AW: ListBox
17.11.2006 11:09:06
Thomas
Ich habe noch die ListBox Nr, anpassen müssen.
Jetzt funktioniert es.
Besten Dank und ein schönes Wochenende.
Gruß
Thomas
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige