Nummerierung mit Autowert

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
ListBox
Bild

Betrifft: Nummerierung mit Autowert von: Drazen
Geschrieben am: 28.02.2005 16:17:57

Hallo,

ich wollte Daten in eine ListBox einlesen mit folgendem Code:

Private Sub EINLESEN()
    Sheets("KUNDEN").Activate
    Dim l As Long, c As Range
    Set c = ActiveSheet.Cells(1, Columns.Count)
    l = c.Column: If IsEmpty(c) Then l = c.End(xlToLeft).Column
    lstKunden.Column = "B1:17" & l
End Sub


Ich bekomme aber immer die Fehlermeldung, Index ausserhalb des gültigen Bereichs, woran liegt das?

Grüsse
Drazen
Bild


Betrifft: AW: Sorry falsche Beschr. Listbox hor. füllen ... von: Drazen
Geschrieben am: 28.02.2005 16:19:19




 Bild

Beiträge aus den Excel-Beispielen zum Thema "OCX-Datei per VBA einbinden"