besteht die Möglichkeit aus einer listbox heraus, mit mehrfachauswahl, die ausgewählten werte einzelnd in eine zelle zu schreiben?
Beispiel:
aus listbox gewählt
1. Gemüse
2. Erbsen
3. Grün
diese sollen jetzt nicht zusammenhängend wie im folgenden code gespeichert werden
Dim i As Integer
With WKOCH.TextBox11
For i = 0 To UFKOCHAuswahl.ListBox1.ListCount - 1
If UFKOCHAuswahl.ListBox1.Selected(i) Then
.Text = .Text & UFKOCHAuswahl.ListBox1.List(i) & Chr(10)
End If
Next
End With
sondern im sheet("Ausdruck")
a23 = Gemüse
b23 = Erbsen
c23 = Grün
erscheinen
Kann mir da jemand weiter helfen?
Gruß und Danke
Holger