Box message qui s'affiche ....

[tvhabdo]

Bonjour tous, le Forum...


Dans la cellule A1, j'ai la somme de plusieurs cellules (b1+b2+b3) et je souhaiterais être averti par une message BOX quand le total de 25 000 kgs est atteint ou dépassé en A1

avec un message par exemple :
ATTENTION LE POIDS DE 25 000 KG EST DÉPASSÉ

Merci pour le partage des connaissances

Patrick

 

[Guest]

Re : Box message qui s'affiche ....

Bonjour tvHabdo,

Faire un clic-droit sur le nom de l'onglet de la feuille de calcul puis choisir 'Visualiser le code' dans la fenêtre qui s'ouvre, dans le panneau de droite, coller les lignes suivantes:

Private Sub Worksheet_Calculate()
    If Range("A1").Value > 25000 Then
        MsgBox "ATTENTION LE POIDS DE 25 000 KG EST DÉPASSÉ", vbExclamation, "Dépassement de valeur"
    End If
End Sub

Attention si la valeur n'est pas corrigé, la macro sera lancée à chaque fois que la feuille sera recalculée.

A bientôt

 

[Lii]

Re : Box message qui s'affiche ....

Bonjour,

Sans macro, avec : Données--> Validations et après avoir sélectionné la plage :

 

[tvhabdo]

Re : Box message qui s'affiche ....

Super, ça fonctionne a Merveille

Encore Merci et à bientôt sur un autre fil

Patrick