Probleme sur mon classeur
Bonjour,
J'ai une petite demande à faire
En effet j'aimerais que mon stock initial en feuille "inventaire",une fois avoir éditer mon bon de commande des différents fournisseurs prenne les commandes envoyées en compte et que du coup le stock initial soit mis a jour
Par exemple: je fais une commande "PATISFRAIS"
je commande 15kg de blancs d'œufs mon stock final avant commande est de -3kg du coup apres avoir editer ce bon de commande le stock initial en page "INVENTAIRE" devrait etre de 12kg
Et ca pour tout les fournisseurs
Merci à tous!!!
src='https://img-19.ccm2.net/pI_ctxoDafV5tiziHFJ3TrK9sqY=/440x/ea6495d953864113a20c6b32c0501265/tmp/inventaire.png' alt='' width='440' border='0' />
src='https://img-19.ccm2.net/lYkRS6HODEyqEWHFLI-IOZMj37o=/440x/a20bcb8a32ec4d2f9c49c99bdcb03a3b/tmp/bon_de_commande.png' alt='' width='440' border='0' />
J'ai une petite demande à faire
En effet j'aimerais que mon stock initial en feuille "inventaire",une fois avoir éditer mon bon de commande des différents fournisseurs prenne les commandes envoyées en compte et que du coup le stock initial soit mis a jour
Par exemple: je fais une commande "PATISFRAIS"
je commande 15kg de blancs d'œufs mon stock final avant commande est de -3kg du coup apres avoir editer ce bon de commande le stock initial en page "INVENTAIRE" devrait etre de 12kg
Et ca pour tout les fournisseurs
Merci à tous!!!
src='https://img-19.ccm2.net/pI_ctxoDafV5tiziHFJ3TrK9sqY=/440x/ea6495d953864113a20c6b32c0501265/tmp/inventaire.png' alt='' width='440' border='0' />
src='https://img-19.ccm2.net/lYkRS6HODEyqEWHFLI-IOZMj37o=/440x/a20bcb8a32ec4d2f9c49c99bdcb03a3b/tmp/bon_de_commande.png' alt='' width='440' border='0' />
6 réponses
-
Merci beaucoup mon probleme a été resolu
-
J'ai complété la macro de la feuille Pastifrais ainsi :
If ActiveCell = Range("M27") Then Range("E12").Font.ColorIndex = 1 [E12].Value = [N1].Value ligne = Columns(5).Find("*", , , , xlByColumns, xlPrevious).Row For n = 15 To ligne ligneE = Sheets("Inventaire").Columns(1).Find(Range("E" & n), , , xlWhole, xlByColumns, xlPrevious).Row Sheets("Inventaire").Range("C" & ligneE) = Sheets("Inventaire").Range("C" & ligneE) - Range("L" & n) Next End If
https://mon-partage.fr/f/zd6Zfe8Y/
Si cela te convient, à toi de reproduire pour les macros des autres feuilles
Cdlmnt
Via
-
https://cjoint.com/c/HLFqGSIgn3H
Le voici merci pour l'info!! -
Bonjour
Tes liens ne sont pas valides
Poste ton fichier sur cjoint.com, fais créer un lien que tu copies et reviens colelr cici si tu veux une aide
Cdlmnt
Via
-
Merci pour votre réponse mais ce n'est pas la clé pour mon problème
-
ContributeurBonjour
Un exemple à adapter
https://mon-partage.fr/f/uFyf3y4j/
