Copier valeur textbox dernière colonne

bonjour tt le monde,

sur mon fichier exemple joint, je souhaiterais que la valeur de la TB_sorti de mon userform1 vienne s'inscrire à la suite

de la colonne de droite de la ligne sélectionnée dans la listbox et ainsi de suite à chaque nouvelle entrée.

Pouvez-vous m'aider ?

merci

Bonjour,

A tester :

Ligne = ListBox1.ListIndex + 1

Dercol = Ws.Cells(Ligne, Columns.Count).End(xlToLeft).Column + 1

Ws.Cells(Ligne, Dercol).Value = Me.TB_sorti.Text

bonjour,

et merci de la réponse.

Malheureusement ça ne fonctionne pas.

bonjour

modification de Ligne ok

A Voir

A+

Maurice

c'est tout simplement parfait !

je vais essayer de l'adapter à mon fichier origine.

Merci pour le travail accompli et encore bravo