Bah... C'est quand même une drôle d'idée !
Ça ne peut marcher correctement qu'une fois (tant que les 2 listbox sont équivalents) puisque vous parcourez la liste de 1 à son max. Après la première suppression il est évident que le ListBox 2 à un élément de moins et ne peut aller jusqu'à 4.
Remarquez toutefois que si vous supprimez d'abord le dernier puis le premier de la liste, la suppression se fait bien (sur le Userform).
Après il se produit un erreur bien logique puisque le nombre d'items n'est plus identique...
A+