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"