effacer une ligne ds listbox

[Dennnisss]

bonjour a tous

hier j'ai demander de l,aide sur le forum et jp14 ma tres bien repondu a cette question , soit dans une listbox effacer une ligne et aussi transferer cette ligne dans une autre feuille de calcul sur excel , dans son programme tout est ok , lorsque j'ai essayer d'incorporer son code dans mon programme principal alors j'ai une erreur il efface bien la ligne dans la listbox sauf que sur la feuille il transfere par la bonne ligne il prend la ligne suivante
alors j'ai refait un userform avec une partie de mon programme principal pour mieux me suivre et j'ai tenter de reparer se code et sans vain alors je cherche un acro qui pourrais m'aide svp

merci de votre aide
denis😉

 

[bqtr]

Re : effacer une ligne ds listbox

Bonjour Dennnisss,

Le problème semble venir de la variable NumLig dans le code du bouton
Private Sub CommandButton4_Click()

Il faut la modifier comme ceci :

NumLig = 4 + Me.ListBox1.ListIndex

Enlever le +1 à la fin, c'est ça qui provoque le décalage de ligne.

A+

Edit: Bonjour Jean-Marcel, effectivement

 

[Dennnisss]

Re : effacer une ligne ds listbox

bonjour jean-marcel et bqtr

j'ai essayer les deux codes que vous me suggerer et les deux sont ok , alors merci a vous deux pour votre aide , elle est tres apprecier et passer une belle journee merci mille fois

denis