Créer une alerte dans Excel

https://www.cjoint.com/?BAjnMFqaTTn
Voila, le mot de passe est "pauses", l'arlerte concerne les valeurs de la ligne 39 (en gras)

Merci !

C'est ce que je craignais : beaucoup trop de données sont exploitées pour arriver au résultat final, et il faudrait mettre un critère de validation dans chacune d'entre elles, en utilisant la formule de "Autoriser/Personnalisé".

Dans ton cas de figure, il faut donc oublier la Validation de données et
revenir à la Mise en forme conditionnelle telle que décrite par Mike-31.

Cordiales salutations à vous deux.

Et si je fais une formule "=" quelques lignes plus bas et que j'exploite celles-ci ??

Merci !

Non. Le principe de la validation de données est le suivant :

. 1) Je saisis une donnée en A1, et je crée un critère de validation disant "Si A1 remplit telle condition, alors je permets la validation de A1".
Cela vaut pour Autoriser Nombre entier, Décimal, Date, Heure et Longueur de liste.

. 2) Je fabrique une liste de données possibles, et crée dans A1 une liste déroulante avec laquelle je peux choisir l'une d'elles. C'est le critère Autoriser Liste.

. 3) J'ai en A1 une formule qui fait intervenir la donnée saisie en B1, par exemple =-3^B1.
C'est en B1 que je devrai créer un critère de validation disant par exemple "Si le résultat du calcul effectué en A1 remplit telle condition, alors je permets la validation de B1".
Cela vaut pour Autoriser Personnalisé. Ce n'est pas A1 qui contient un critère de validation !

C'est pourquoi cela n'est pas applicable dans ton tableau.

OK MERCI !

Merci beaucoup, je vais essayer de suite !

Merci, cela fonctionne mais je comprend pas comment noter plusieur cellules.
les cellules à contrôler sont sur la ligne 38
Merci

Il faut modifier la ligne :
Union(Range("A1"), Range("B2"), Range("C3"), Range("E3"))
Tu peux ajouter ou enlever des Range(machin) dans les parenthèses composant l'Union, en respectant bien la syntaxe, les virgules, guillemets etc...
Soit, pour la ligne 38 :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Range, maPlage As Range
Set maPlage = Union(Range("A38"), Range("B38"), Range("C38"), Range("E38"))
For Each Cel In maPlage
    If Cel < 5 Then
        MsgBox "Oulalalala, en : " & Cel.Address
        Exit For
    End If
Next
End Sub

Mais en fait, il faudrait que cela alerte quand il y a moins de 5, certes, mais seulement s'il y a plus de 0.05...

Merci

Et après?
Dis nous tout tout de suite ça sera plus simple...

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Range, maPlage As Range
Set maPlage = Union(Range("A38"), Range("B38"), Range("C38"), Range("E38"))
For Each Cel In maPlage
    If Cel < 5 And Cel > 0.05 Then
        MsgBox "Oulalalala, en : " & Cel.Address
        Exit For
    End If
Next
End Sub