ListBox1 den ListBox2' ye Veri Aktarmak

[omeryılmaz]

Personel Ünvanlarına göre ListBox1 de Listelenen verilerin ListeBox 2 ye tektek aktarımı düzgün şekilde çalışmakta ancak toplu aktarımda tek sütun bilgilerini aktarmaktadır.

Yardımlarınız için şimdiden şükranlarımı sunuyorum..

 

[Orion1]

Kolay gelsin.

Private Sub CommandButton69_Click() ' Hepsini Aktar
ListBox23.Clear
If ListBox15.ListCount < 1 Then Exit Sub
ListBox23.List = ListBox15.List
ListBox15.Clear
Label498.Caption = ""
Label499.Caption = ""
Label500.Caption = ""
Label501.Caption = ""
Atamal.Caption = ListBox23.ListCount
End Sub

 

[omeryılmaz]

Teşekkürler Hocam