Excel message erreur selon cellule

Bonsoir,

Est ce qu'il est possible sur Excel d'afficher un message d'erreur et bloquer la cellule lorsque le chiffre reporté dans la cellule est supérieure à 5 par exemple.

Quand je dis reporté ça veut dire que c'est la somme de deux cellules ainsi la cellule est variable.

J'espère que ma demande est clair.

Merci d'avance pour vos réponses et vos suggestions pour régler cette problématique.

Cordialement

Bonsoir à tous !

robert2 a écrit :

J'espère que ma demande est clair.

Alors je m'explique je souhaiterais que lorsque la cellule P63 dépasse 3 un message d'erreur s'affiche pour l'utilisateur.

Mais dans la cellule P63 s'est un calcul donc on ne peut pas saisir à la main le resultat ducoup je ne peux pas utiliser validation de donnée.

Ainsi je voudrais savoir si il y a autre moyen pour repondre à ma demande.

Merci d'avance.

Bonsoir à tous !

J'ai peur de ne pas bien appréhender votre difficulté....

Voir ma proposition :

merci bcp pour votre aide je pense que ça m'a déjà beaucoup aidé

mais est qu'il est possible de faire un message box et de bloquer la saisie la cellule ou la valeur a été dépassé ?

Bonsoir à tous de nouveau !

Cela me semble très... "délicat".

Vos formules sont en cascades...... P62 <--- P61 <--- P16/P60 <--- liste de validation en colonne K.

Il faudrait donc intervenir en amont de la validation des données en colonne K

Peut-être qu'un spécialiste VBA aura la créativité nécessaire.....

Bonjour,

Proposition, si la dernière sélection en colonne K fait dépasser le total de 3 en P62 alors , il y a émission d'un message suivi de l'annulation de la dernière saisie.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    On Error GoTo Sortie
    Application.EnableEvents = False
    If Not Application.Intersect(Target, Range("K8:K59")) Is Nothing Then
        If Range("P62") > 3 Then
            MsgBox "maximum atteint, dernière saisie annulée"
            Target.Value = ""
        End If
    End If
Sortie:
    Application.EnableEvents = True
End Sub

Cdlt

Bonjour,

Merci beaucoup pour votre proposition de code je crois bien que cela fonctionne lorsqu'il y une seule page sur le fichier excel !

Est ce que vous savez comment est ce que je dois faire lorsqu'il y a plusieurs page sur ce fichier ?