Valider les données d'une boite de dialogue

Bonjour,

Voici en pièce jointe un fichier de gestion de stock. Je souhaite maintenant valider mes valeurs dans le mouvement de stock grâce à ma boite de dialogue mais là, je sèche :

Sélectionner 'Entrée' ou 'Sortie', choisir la référence (Je pense avoir trouvé), entrer une quantité puis valider les valeurs. La quantité doit incrémenter ou décrémenter (selon le choix) la référence choisie de la feuille "Stock" dans la case 'Stock réel'.

Je vous remercie par avance de votre aide.

Cordialement,

bonjour,

une solution

Private Sub Valider_Click()
On Error GoTo ff:
Dim ns As Double
With Sheets("Stock")
    .Activate
For i = 2 To Range("F" & Rows.Count).End(xlUp).Row
If Range("F" & i) = ComboBox1.Value Then
    If op1.Value Then
           Range("i" & i).Value = Range("i" & i).Value + CDbl(TextBox1.Value)
    ElseIf op2.Value Then
           Range("i" & i).Value = Range("i" & i).Value - CDbl(TextBox1.Value)
    End If
End If
ns = Range("i" & i).Value
Next
End With
Sheets("Nouvelle réf").Activate
MsgBox "Le stock de l'article " & ComboBox1.Value & " a subi un mouvement, le nouveau stock est " & ns
Unload Me
ff:
Exit Sub
End Sub

Re,

ton fichier en retour avec modification

Bonsoir,

Excellent kingfadhel !

Par contre j'ai apporté un complément à ma boite. Je souhaite contrôler les sorties. Je m'explique :

Lors d'une sortie, je souhaite créer un historique par machine. Sur la feuille "sorties", Il faudrait incrémenter différentes cellules concernant la machine, la référence ainsi que la date de sortie. Est-ce possible ?

Cordialement,

Bonsoir,

J'ai beau retourner le problème dans tous le sens je n'arrive pas à faire ce dernier bout de programme. Y'a t-il une bonne âme pour venir à ma rescousse ?

Cordialement,

Bonjour

A tester

Bonjour Banzai64,

Merci beaucoup pour cette amélioration. Cela fonctionne seulement, dans la colonne N°machine, il s'agit d'une entrée "manuelle" qui provient de la boite de dialogue. Ce numéro de machine est à renseigné pour historiser la sortie du mouvement.

Peux-tu faire le complément ?

C'est vraiment du bon boulot que vous faites, merci encore

Cordialement,

Bonjour

Il faut m'expliquer un peu plus

Le numéro de machine c'est quoi (les >> ) ?

Ce numéro est bien entré lors de la saisie d'une nouvelle référence

Et tu veux le modifier lors d'un mouvement du stock ?

La référence est elle unique ?

Bonjour,

En fait, les >> correspond à un rangement de matériel et non un N° de machine.

Donc, dans la boite de dialogue, il faut ajouter un champs d'ecriture qui correspondra à un n° de machine (Entré manuellement) et que l'on retrouvera sur une ligne dans la feuille "sortie" avec la date de sortie matériel.

Est-ce clair ?

Bonjour

douggy85 a écrit :

Est-ce clair ?

C'est toi qui va répondre à cette question

J'ai fait d'après ce que j'ai compris

Impec ! Merci Banzai64 !