Microsoft 365 décaler le contenu d 'une cellule si celle ci est à 0

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pouetpouetlagalette

XLDnaute Junior
Bonjour,
j'aimerai savoir si il y a une formule qui me permettrait de remonter les informations contenues dans une cellule si la première se retrouve à zéro , pour avoir un suivi des stocks , à savoir qu'une fois que le produit avec la date 1 se retrouve stock 0, la même référence produit, mais avec une autre date prenne sa place.
Merci.
 

Pièces jointes

Solution
Bonjour
J'ai donc ajouter le code dans la feuille stock Boco
Je n'ai pas de tuto particulier sur le vba, mais tu trouveras de nombreux sites faits par les meilleurs souscripteur d'exceldownload , qui te permettront d'évoluer.
Pose des questions, analyse les réponses, et ca va venir....
Oups!!
Je crois que j'ai compris.
Dans le début du post on parle de stock critique, en fait c'ette condition ne me semble pas nécessaire, j'ai donc dans cette version supprimer cette condition. Critique ou pas le calcul se fera
Bonjour SOUSOU,
j'ai réussi à faire vivre le fichier et analyser les axes de progression pour rendre l'utilisation au quotidien plus pertinent. Est il possible pour toi sur l'onglet stock boco de reproduire ce que tu m'avais fait sut l'onglet stock bt; à savoir que dès qu'une référence en date est terminée , la deuxième prod remonte, sur le principe du first in first out?
Amitiés.
 

Pièces jointes

bonjour
en principe tu ajoutes ce code dans le code de la feuille stock boco, et le travail sera le même
A vérifier de près je pense que les deux feuilles ont la même structure



Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Set t = Target.Cells(1, 1)
If t.Row > 8 And t.Column = 4 And t <> 0 Then Call valide(t, "sortie")
If t.Row > 8 And t.Column = 3 Then Call valide(t, "entree")
'-------------------------------------------------------------

Application.EnableEvents = True
End Sub
 
bonjour
en principe tu ajoutes ce code dans le code de la feuille stock boco, et le travail sera le même
A vérifier de près je pense que les deux feuilles ont la même structure



Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Set t = Target.Cells(1, 1)
If t.Row > 8 And t.Column = 4 And t <> 0 Then Call valide(t, "sortie")
If t.Row > 8 And t.Column = 3 Then Call valide(t, "entree")
'-------------------------------------------------------------

Application.EnableEvents = True
End Sub
Bonjour SOUSOU, eh ben......pas de bol.
 
Bonjour
J'ai donc ajouter le code dans la feuille stock Boco
Je n'ai pas de tuto particulier sur le vba, mais tu trouveras de nombreux sites faits par les meilleurs souscripteur d'exceldownload , qui te permettront d'évoluer.
Pose des questions, analyse les réponses, et ca va venir....
 

Pièces jointes

Bonjour
J'ai donc ajouter le code dans la feuille stock Boco
Je n'ai pas de tuto particulier sur le vba, mais tu trouveras de nombreux sites faits par les meilleurs souscripteur d'exceldownload , qui te permettront d'évoluer.
Pose des questions, analyse les réponses, et ca va venir....
Bonjour SOUSOU,
je te remercie grandement de ta bienveillance.
C'est vrai que quand tu es novice c'est pas simple.
Mais je relativise, même les vieux chênes ont été glands.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour