If Me.Liste100.ListIndex = -1 Then Exit Sub
yerine aşağıdaki gibi dener misiniz?If Me.Liste100.ItemsSelected.Count = 0 Then Exit Sub
Not: eğer tek tek taşınacaksa neden çoklu seçim var o zaman? birden çok seçilip düğmelere basılırsa (bilerek yada kazar) ne yapılacak?