Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
VBA - List Box Zeilen einfügen
07.12.2021 14:56:56
Moritz
Liebe Alle,
ich bin gerade dabei meine ListBox1 mit Daten aus meinem Tabellenblatt "Worksheet" aus den Spalten A, B und D ( jeweils beginnend mit der 2. Zeile, 1. Zeile sind Überschriften) zu füllen und bekomme dauernd die Fehlermeldung 424.
Mein Code:

Private Sub UserForm_Initialize()
Dim lngZeile As Long
Dim lngZeileMax As Long
Dim lngz As Long
With Me.ListBox1
.ColumnCount = 3
.ColumnWidths = "120;120;150"
End With
With Worksheet
lngZeileMax = .Range("A" & .Rows.Count).End(xlUp).Row
For lngZeile = 2 To lngZeileMax
Me.ListBox1.AddItem .Range("A" & lngZeile).Value
Me.ListBox1.Column(1, lngz) = .Range("B" & lngZeile).Value
Me.ListBox1.Column(2, lngz) = .Range("D" & lngZeile).Value
lngz = lngz + 1
Next lngZeile
End With
End Sub
Bitte um Hilfe.
Liebe Grüße,
Moritz

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige

332 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige