Mehrspaltige LB kopieren
18.06.2015 07:14:14
Chris
ich möchte alle Inhalte einer vierspaltigen Listbox per Button in ein anderes Sheet kopieren. Bei dem Makro unten bekomme ich den Fehler, das i nicht gefüllt werden kann...
jmd eine Idee? Gruß Chris
Dim i As Integer
For i = 0 To 4
Worksheets("2017").Cells(1, i + 1) = UserForm1.ListBox2.Column(i)
Next i
End Sub