Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
356to360
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
356to360
356to360
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ListBox mit 2 Spalten füllen

ListBox mit 2 Spalten füllen
05.01.2004 14:31:18
Roland
Hallo Zusammen,

ich möchte aus dem Worksheet("Logg") die Spalte B und die Spalte C in eine Listbox "Anmeldung.LoggÜbersicht" füllen, bis zur letzten gefüllten Zeile. Wer kann mir dabei helfen ?

Recht herzlichen Dank

Roland

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ListBox mit 2 Spalten füllen
05.01.2004 17:20:36
Bertram
Hallo Roland,

das ist zwar nicht besonders elegant, aber sollte funktionieren.


Private Sub UserForm_Initialize()
Dim Matrix() As String
Dim b As Integer
Dim c As Integer
Dim i As Integer
Dim ii As Integer
b = Columns(2).End(xlDown).Row
c = Columns(3).End(xlDown).Row
If b - c < 0 Then ii = c Else ii = b
ReDim Matrix(2, ii)
For i = 0 To ii
Matrix(0, i) = Cells(i + 1, 2).Value
Matrix(1, i) = Cells(i + 1, 3).Value
Next i
Me.ListBox1.Column() = Matrix
End Sub


Gruß
Bertram
Anzeige

277 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige