Discussion :

[mavean]

Bonjour

J'ai sur une feuille des cellules contenant du code, de la désignation et des stocks.
Dans un Userform :
la Textbox 1 me demande le code recherché
les Textbox 2 / 3 / 4 m'affichent la désignation et le conditionnement (que je ne modifie pass)
les Texbox 5 / 6 / 7 m'affichent le stock en unité / colis / livraison
L'userform fonctionne bien.

Je souhaite pouvoir changer les valeurs des stocks (Textbox 5 / 6 / 7) directement dans celles ci (et que bien sur cela se recopie dans les cellules correspondantes).
Comment faire.
Je mets mon fichier d'exemple pour comprendre.

Merci à tous de votre aide.

[BENNASR]

bonjour
il suffit d'ajouter un bouton de commande ds ton userform et insérer le code suivant
Code qui peut etre améliorer avec les grand monsieur de ce site vu que chui débutant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub CommandButton3_Click()
Dim DernLigne As Long
DernLigne = Sheets("liste").Range("F" & Rows.Count).End(xlUp).Row
Dim plage As Range
Set plage = Sheets("liste").Range("F10:F" & DernLigne)
codrecherché = CDbl(TextBox1.Value)
For Each cell In plage
If cell.Value = codrecherché Then
    Sheets("liste").Cells(cell.Row, 16) = TextBox5.Value
    Sheets("liste").Cells(cell.Row, 17) = TextBox6.Value
    Sheets("liste").Cells(cell.Row, 18) = TextBox7.Value
End If
Next cell
End Sub

[mavean]

Re

Un grand merci pour ton aide.

Martial.