folgendes ws. triviales Problem.
Habe eine Listbox, die ich mit Werten aus einer Tabelle fülle. Wie kann ich nun die Werte aus diese Listbox auslesen und zB in eine andere Tabelle schreiben? Brauche Mehrfachauswahl...
Danke!
Private Sub CommandButton1_Click()
Const zeile = 10
Const spalte = 2
Dim zähler As Integer
Dim i As Integer
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then
Cells(zeile + zähler, spalte) = .List(i)
zähler = zähler + 1
End If
Next i
End With
End Sub
Gruß Matthias