VBA Message Box selon valeur d'une cellule

Bonjour,

J'ai très peu de connaissance en VBA mais j'en ai besoin pour une demande professionnelle.

Je voudrais que si le total de la colonne dépasse 3 (cellule jaune) un MsgBox s'ouvre en disant que le total est trop élevé.

J'ai essayé de faire quelque chose mais cela ne fonctionne pas...

Private Sub Workbook_ModelChange(ByVal Changes As ModelChanges)

For Each cell In Range("R62")
If cell.Value > 3 Then
MsgBox "Vous avez déposer les 3 jours d'arrêt"

End If

End Sub

Comment est ce que je peux établir une macro ou quelque chose sur excel ?

Vous trouverez le fichier ci-joint

Merci par avance

2fichier.xlsm (40.60 Ko)

Bonjour,

Teste ceci

3fichier-1.xlsm (40.41 Ko)

Lorsque je veux exécuter le code, cela s'affiche est-ce normal ?

image

Re,

Cela c'est ta macro que tu dois supprimer,

Volià le fichier épuré de tes macros

Tu n'as pas besoin de lancer, le fait de mettre un chiffre plus grand que 3 en P62 et la macro est lancée

5fichier-1.xlsm (37.79 Ko)

Merci pour votre aide.

Cependant il faut noté un chiffre dans la cellule pour que ça marche.

Je souhaiterais savoir si cela peut fonctionner avec une formule ?

Re,

Teste comme ceci

8fichier-2.xlsm (39.58 Ko)
Rechercher des sujets similaires à "vba message box valeur"