Interdire le dépassement d'une valeur

[Lili189]

Bonjour,

j'ai un petit soucis pour un tableau.

Je dois affecter différents secteurs à différents employés. Par exemple un employé est affecté 30% au secteur 1, 40% au secteur 2 et 30% au secteur 3 et jamais au secteur 4.

Je voudrais que dans mon tableau, lorsque je saisie en manuel mes pourcentages, une sorte de protection avec message d'erreur. Si par mégarde j'écris 30%, 40%, 30% et 40% pour le secteur 4, ce qui fait 140% !

Il me faudrait une manip ou formule empéchant le dépassement de 100% lors de la saisie.

J'espère avoir été claire ^^'

merci d'avance.

Aurélie

 

[mécano41]

Re : Interdire le dépassement d'une valeur

Bonjour,

Tu mets tes cellules en format pourcentage et tu choisis une cellule (ou plusieurs cellules liées) dans laquelle tu écris :

= SI(SOMME(C4;C5;F4;F5)>1;"Erreur....";""). Tu peux même mettre une MFC dessus pour attirer l'attention

Cordialement

 

[phlaurent55]

Re : Interdire le dépassement d'une valeur

Bonjour Lili,

avec ce code :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C4:C5", "F4:F5")) Is Nothing Then
If [C4] + [C5] + [F4] + [F5] > 1 Then
MsgBox ("Vous dépassez les 100% ")
End If
End If
End Sub

à+
Philippe

Edit: Bonjour Mécano