Action suite à mise à jour
Nolive
-
Voya 59 -
Voya 59 -
Bonjour,
Novice en vba, je cherche à réaliser une macro qui s'exécute automatiquement suite à la mise à jour d'une cellule (valable pour toute les cellules d'une plage).
Dans le contexte :
Je travaille sur l'évaluation des fournisseurs. Certains de nos fournisseurs sont critiques pour la réalisation de nos activités et sont donc soumis à évaluation.
Lors de la réception d'une commande, si le fournisseur est critique, alors la mise à jour de la date de livraison de la commande entraîne l'execution d'une macro qui provoque l'affichage d'une Msgbox rapellant à l'utilisateur qu'il doit remplir l'évaluation du fournisseur.
Je souhaire donc faire quelque chose comme :
Sub "mis à jour de la cellule"
If "fournisseur critique" Then "msgbox"
Else ""
.... sauf que je ne connais pas l'instruction "Sub mise à jour cellule"...
Merci d'avance de votre aide
Nolive
Novice en vba, je cherche à réaliser une macro qui s'exécute automatiquement suite à la mise à jour d'une cellule (valable pour toute les cellules d'une plage).
Dans le contexte :
Je travaille sur l'évaluation des fournisseurs. Certains de nos fournisseurs sont critiques pour la réalisation de nos activités et sont donc soumis à évaluation.
Lors de la réception d'une commande, si le fournisseur est critique, alors la mise à jour de la date de livraison de la commande entraîne l'execution d'une macro qui provoque l'affichage d'une Msgbox rapellant à l'utilisateur qu'il doit remplir l'évaluation du fournisseur.
Je souhaire donc faire quelque chose comme :
Sub "mis à jour de la cellule"
If "fournisseur critique" Then "msgbox"
Else ""
.... sauf que je ne connais pas l'instruction "Sub mise à jour cellule"...
Merci d'avance de votre aide
Nolive
Configuration: Windows Vista Internet Explorer 7.0
1 réponse
-
salut,
En fait il faut créer une nouvelle fonction
la fonction se place dans la cellue tout comme la formule "somme" mais cette fonction est personnalisée....
Function mise_a_jour_cellue (cel as range)
' contenu de la focntion...
'###############
'teste si le fournisseur est "critique"
if crtique=true then msgbox "Remplissez....",,"Avertissement"
exit function
