Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
748to752
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
748to752
748to752
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Listbox

Listbox
24.03.2006 22:05:55
Uwe
Hallo Forum,
mit folgendem Teil-Code füge ich Werte einer Sheeet in eine ListboxUF ein:
With UserForm16.ListBox1
.ColumnCount = 10
.ColumnHeads = True
.RowSource = "Formular2!A30:J" & i
' A B C D E F G H I J
.ColumnWidths = "1cm;3cm;0cm;3cm;0cm;3cm;0cm;8cm;3cm;3cm"
End With
Es wird jedoch jeweils nur die erste Zeile der Zellen angezeigt!
Gibt es ein Möglichkeit den kompletten Zellinhalt in der UF zurück
zu schreiben!?
Dank für Eure Hilfe!
Gruß Uwe

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Listbox
24.03.2006 22:15:10
chris
ich verstehe dich leidre nicht ganz.
Aber ist die Var i höher als 1 ? Ich habe
i = 1
j = 10
und bei mir werden mehere zeilen angezeigt.?
AW: Listbox
24.03.2006 22:26:34
Uwe
Hallo Chris,
hier nochmal der Code. Die Zellen sind mit Zeilenumbruch formatiert! In der UF werden aber nur die ersten Zeilen der Zellen angezeigt.
Worksheets("Formular2").Select
i = ActiveSheet.UsedRange.Rows.Count
With UserForm16.ListBox1
.ColumnCount = 10
.ColumnHeads = True
.RowSource = "Formular2!A30:J" & i
' A B C D E F G H I J
.ColumnWidths = "1cm;3cm;0cm;3cm;0cm;3cm;0cm;8cm;3cm;3cm"
End With
Kannst Du nochmal helfen?
Dank! Gruß Uwe
Anzeige
AW: Listbox
24.03.2006 22:29:19
chris
Hallo Uwe,
wollte eigentlich ins Bett.
Aber wenn du die Datei mal zum Dwonload hinzufügst würde ich sie mir mal ansehen ?
Bitte möglichst bald :)
gruß Chris
AW: Listbox
24.03.2006 22:36:36
Uwe
da geht es dir wie mir!
geh erstmal ins bett! Kannst mir ja Deine Mailadrsse senden dann schick ich dir das teil.
muss ja nicht heute gelöst werden!
Gruß Uwe
umanig@freenet.de
AW: Listbox
25.03.2006 18:29:02
Luschi
Hallo Uwe,
in Vba herrschen amerikanische Verhältnisse und deshalb ist das Listentrennzeichen ein Komma und nicht das Semikolon; also so:
ColumnWidths = "1cm,3cm,0cm,3cm,0cm,3cm,0cm,8cm,3cm,3cm"
Gruß von Luschi
aus klein-Paris
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige