Hallo forum!
Habe ein Problem mit zwei Listenfeldern:
Ich will von einem Listenfeld mit allen Datensätzen die markierten in ein zweites Listenfeld übernehmen. Erstes Lst hat die Spalten "ID, Text1, Text3" und nun will ich die ID und Text1 in ein zweites Lst zur Weiterverarbeitung übernehmen. Hier mein Codesegment für die Übernahme:
For Each varElem In lstTitel.ItemsSelected
lstTitelneu.AddItem (lstTitelneu.Value & lstTitel.Column(0, varElem) & strNeueZeile)
lstTitel.Selected(varElem) = 0 'Markierung entfernen
Next
Mit einer Spalte funktioniert es einwandfrei!
Aber nun stehe ich anscheinend auf der Leitung wie die Column(1) auch in das zweite Lst bekomme ???
Danke für die Hilfe!!
Hallo,
Me!lstTitelneu.AddItem Me!lstTitel.Column(0, varElem) & ";" & Me!lstTitel.Column(1, varElem)
wobei die Spaltenanzahl des Listenfeldes auf 2 stehen muß
Guten Morgen!
Danke für die Lösung - funkt super!! ;D
lg
Andi