Dante Amor respondió:
Cambia los nombre de los listbox (ListBox_Izq y ListBox_Der) por tus nombres Con dobleclick: Private Sub ListBox_Der_DblClick(ByVal Cancel As MSForms.ReturnBoolean) If ListBox_Izq.ListCount = 26 Then MsgBox "Límite de artículos alcanzado" Exit Sub...