Décalage colonne suppression item listbox

Bonjour

Dans le doc joint, ma listbox 1 correspond à la zone jaune et ma listbox2 à la zone rouge (colorées juste pour l'occasion, pour que vous vous repériez un peu mieux)

Dans le formulaire, quand je clique à plusieurs reprises sur les boutons de suppression pour supprimer la valeur sélectionnée, j'ai parfois un décalage dans le tableau (souvent quand il ne reste plus qu'un choix dans la liste, mais parfois avant aussi !!!) avec les valeurs des colonnes de droite qui se décalent ...

Merci d'avance

30classeur3.xlsm (20.77 Ko)

Bonjour,

"Delete", pour une cellule a un argument facultatif (Shift) qui permet de préciser dans quel sens, une fois la suppression effectuée, les cellules d'à coté doivent être déplacées, "xlShiftToLeft " déplace les cellules de droite vers la gauche et "xlShiftUp" déplace les cellules vers le haut et dans ton cas c'est cette dernière valeur que tu dois utiliser :

Sheets("PARAM").Cells(Ligne + 2, 5).Delete xlShiftUp '<-- !

Ok

Je vais essayer ça de suite.

Merci beaucoup

Rechercher des sujets similaires à "decalage colonne suppression item listbox"