Listbox-Einträge auf ein Tabellenblatt schreiben

[DerAnfänger]

Hallo,

ich habe mir ein kleines Programm gebastelt welches mir Einträge aus einem Verzeichnis in eine Listbox1 schreibt.

Diese Einträge aus der Listbox, deren Anzahl entsprechend dem ausgesuchten Verzeichnis ja variabel ist, sollen jetzt

auf ein Excel-Tabellenblatt geschrieben werden. Wie mache ich das?

[Kuwer]

Hallo,

so in der Art:

Private Sub CommandButton1_Click()

 With ListBox1

   If .ListCount Then

     ActiveSheet.Range("B13").Resize(.ListCount).Value = .List

   End If

 End With

End Sub

Gruß Uwe