Recherche d'une formule ou autre

Résolu
Cluses74 -  
Bonsoir tout le monde
Voila mon problème je me suis créé un petit tableur pour gérer mes stocks dans EXCEL 2010
mais je butte sur une formule.
J'aimerai saisir mes mouvements de stock entrée sortie en cliquant simplement dans une cellule me donnant le stock de chaque référence. Par exemple mon stock est affiché en E10 je clique dessus et j'effectue ma saisie en plus ou en moins et EXCEL 2010 me donne le résultat et me l'affiche dans cette cellule E10 et ainsi de suite à chaque mouvement de stock.
D'avance merci de votre réponse

2 réponses

  1.  via55
    Bonjour

    Tu peux le faire à l'aide d'une macro
    Un double-clic dans la cellule ouvre une fenêtre qui demande le montant à ajouter ou enlever et modifie la valeur de la cellule

    Faire ALT F11 pour ouvrir l'éditeur VBA
    Sélectionner la feuille concernée dans l'arborescence à droite (double-clic)
    Copier et coller la macro suivante dans la page blanche
    Fermer l'éditeur 
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
a = Target.Value
modif = InputBox("Indiquer la quantité à ajouter ou retrancher (signe -)")
nouv = a + modif
Target.Value = nouv
End Sub


    Cdlmnt
    0
    1. Cluses74 Auteur
      Un grand merci pour la rapidité de la réponse et du service rendu
      0
    2. Cluses74
      @Cluses74Bonjour
      Juste une petite question je viens de m'apercevoir que cette macro une fois installée fonctionne dans toutes les cases du tableau comment sélectionner uniquement plusieurs cellules
      D'avance merci de cette aide
      0
    3. via55
      @Cluses74Bonsoir

      Où se trouvent les cellules qui doivent pouvoir bénéficier du double clic ? dans la même colonne ? On peut limiter l'action à cette colonne
      dans une plage contigüe ? on peut limiter à cette plage
      Dans l'attente de précisions

      Cdlmnt
      0
    4. Cluses74 Auteur
      @via55Bonjour
      Les cellules se trouvent dans la colonne F et vont du numéro de ligne 3 jusqu'à 385. Je pense que ces précisions devraient vous aider.
      Encore merci de cette aide
      0
    5. via55
      @Cluses74Bonjour

      La macro devient alors : 
      Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("F3:F385")) Is Nothing Then ' si on se trouve dans la plage indiquée
a = Target.Value
modif = InputBox("Indiquer la quantité à ajouter ou retrancher (signe -)")
nouv = a + modif
Target.Value = nouv
End If
End Sub


      Cdlmnt
      0
  2. eriiic Contributeur
    Bonjour,

    Ce n'est pas la meilleure manière de faire. Tu n'as aucun historique des saisies pour le contrôle.
    Ceci dit une proposition avec saisie directe dans les cellules E10:E15 : https://www.cjoint.com/c/EAewiedZEjq 

    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim v As Double
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [E10:E15]) Is Nothing Then
        v = Target
        Application.EnableEvents = False
        Application.Undo
        Target = Target + v
        Application.EnableEvents = True
    End If
End Sub

    eric

    En essayant continuellement, on finit par réussir.
    Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
    En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
    0
    1. Cluses74 Auteur
      Bonjour
      Et quelle est la meilleure combine pour avoir en même temps un historique des consommations de pièces? Cela me permettrait d'avoir une consommation de date à date et me faciliterait la quantité moyenne de lancement en fabrication pour le renouvellement de mon stock. Mon tableau est simple
      Adresse - Machine - Reference - Désignation - Fifo - Stock.
      Il est vrai que si je peux avoir les consommations de sortie de stock ce serait l'idéal.
      Et encore merci de ces renseignements
      0
    2. eriiic Contributeur
      Bonjour,

      Une feuille de données avec une saisie par ligne, ajouter un champ date (2 si vraiment tu dois gérer en FIFO mais je ne vois pas comment tu comptais faire ça avec une cellule unique).
      Et une feuille pour tes stocks actuels et autres stats. Les TCD (tableaux croisés dynamiques) sont très puissants et aucune formules pour synthétiser les données.

      eric
      0
    3. Cluses74 Auteur
      @eriiicBonsoir
      Tu sais dans la mécanique le FIFO quand il n'y a pas de date de péremption est très simple. Tu colles une étiquette autocollante de couleur changeant tous les mois et de forme tous les ans. Apres tu peux gérer les entrées sorties à la couleur et à la forme d'étiquette. Le plus simple est pour le multi adresses et le mono adresse est au bon vouloir du magasinier. On peux aussi mettre un numéro d'entrée 1,2,3 etc... et on sort les pièces ayant le numéro le plus petit en priorité. Le tout toujours au bon vouloir du magasinier. Les 2 sont appliqués dans l'automobile Le tout est de se tenir un stock maxi d'un mois et le tour est joué.
      J'ai mis une colonne FIFO mais pour l'instant je ne l'utilise pas.
      Cordialement
      0

Discussions similaires

exo pix
Xtyller

2 réponses
recherche à partir de la barre d'adresse
Sylviane

11 réponses