XL 2010 Affecter la valeur d'un Textbox dans un tableau

[eduraiss]

Bonjour le form
J'aimerais coder via mon Userform2 la chose suivante
J'ai une Combobox qui affiche la liSte des produis qui se trouve dans un tableau défini ("liste_produits") Sheets('Nom produit")par exemple oignons
En dessous j'ai un Textbox qui récupère la valeur du stock de sécurité dans le tableau en colonne I par exemple 50

J'aimerais pouvoir modifier ce seuil par exemple le passer à 40 dans l'Userform et que cela le mette a jour dans le tableau
là je bloque
Merci de votre aide
Cordialement

 

[Temjeh]

Bonjour

Sous le textbox a adapté:

Private Sub TextBox1_Change()
  Range("A1") = TextBox1
End Sub

Aussi a l'initialisation de Userform, tu peut y chargé avant la valeur de ton stock

Private Sub UserForm_Initialize()
  Textbox1= Range("A1")
End Sub

A+

 

[eduraiss]

Re le forum
bonjour Temjeh merci pour cette réponse
Je joins un fichier explicatif

Merci

 

[Temjeh]

Bonjour

Juste inversé le Range et le textbox et le mettre sus ton Textbox:

Private Sub Text_essai_Change()
Dim Liste_produits As Integer
Dim C As Range
    Set C = Sheets("Noms produits").Range("Liste_produits").Find(What:=Me.ComboBox1)
    If Not C Is Nothing Then C.Offset(, 3) = Me.Text_essai
End Sub

A+

 

[eduraiss]

re
J'ai mis ce code mais cela ne fonctionne pas
Désolé

 

[Temjeh]

Le voici

Je doit quitté

A+

 

[eduraiss]

Re

Parfait c'est moi qui avait positionner le code au mauvais endroit

merci beaucoup
Cordialement,