Actualisation TextBox

Re bonjour à tous,

Grâce à vous, je progresse dans mon fichier de gestion de stock.

J'ai inclus une TextBox qui indique quand on sélectionne un produit dans la ListView2 le nombre en stock de ce produit.

Je souhaiterai que lorsque l'on valide un mouvement, la TextBox s'actualise avec le stock de ce produit.

La ListView s'actualise mais je n'arrive pas à actualiser la TextBox.

D'avance, un grand merci pour vos explications.

Bonne soirée.

Bonsoir

Essaie dans le code de ton textbox1, de mettre cela à la fin:

With Sheets("STOCK")
    If m = "Entrée" Then
        TextBox1.Value = TextBox1.Value + Val(q)
    Else
        TextBox1.Value = TextBox1.Value - Val(q)
    End If
    MsgBox "Vous avez enregistré une " & m & " de " & q & " " & Produit & "."

    InitListView

    End With

J'ai juste rajouté cela :

 If m = "Entrée" Then
        TextBox1.Value = TextBox1.Value + Val(q)
    Else
        TextBox1.Value = TextBox1.Value - Val(q)
    End If

Il y a peut-être mieux, mais cela marche

Bye

Bonsoir Patty5046

Merci pour ta solution, cela fonctionne nickel.

J'ai beaucoup cherché mais je n'ai trouvé que des méthodes beaucoup plus compliquées à mettre en place et j'ai cumulé erreur sur erreur.

Ta solution est très simple et terriblement efficace.

Encore un grand merci.

Bonne soirée à toi

Edit :Je joins le fichier corrigé.

Enchantée que cela te convienne.

Et merci de tes remerciements.

N'oublie pas de mettre en résolu

Bonne soirée