Mince oui j'avais joint mon fichier mais dernier recours.
Donc j'explique un peu mieux:
J'ai un client qui ma donné son forecast 2016, j'ai donc décidé de faire un classeur excel afin de gérer le tout automatiquement vu les quantités demandées. (bon compte font les bons amis)
J'ai donc créé un tableau afin d'y mettre toute les références ainsi que les quantités liées.
Le but est de faire en faite, un décompte qui me permettra de savoir si à la fin de l'année le résultat est à 0. (différence entre le forecast et les envois)
VBA :
1 2 3 4 5 6 7 8 9 10 11
|
Rem Private Sub Worksheet_Change(ByVal Target As Range)
Rem
Rem If Not Intersect(Target, Range("C2:C6")) Is Nothing Then
Rem If Target.Count = 1 Then
Rem Application.EnableEvents = False
Rem Target.Offset(0, 1).Value = Val(Target.Offset(0, 1).Value) - Val(Target.Value)
Rem Application.EnableEvents = True
Rem End If
Rem End If
Rem End Sub |
Ce code me permet de garder en mémoire la cellule "reste à livrer". (quantité restante de la dernière commande - quantité commandée ce jour)
=SOMMEPROD(($H$4:$H$6=A4)*($J$4:$J$6))
Ce code est dans la cellule (quantité commandée à ce jour). il me permet de me donner un résultat de toutes mes lignes s'il y a plusieurs fois la même réf commandée (indispensable)
Et voilà mon souci, c'est une formule matricielle et mon code vba ne veut pas prendre le résultat.
Donc, je cherche à ce que le code vba prenne en compte la valeur de ma formule.
Merci.
Partager