vérification permanante de la valeur d’une cellule

[HUET]

Bonjour.
Je cherche une macro qui puisse en permanence vérifier que la valeur d’une cellule « X » soit toujours inchangée sinon un message d’alerte.
Mon problème est que je dois confier un tableau pré-formaté à remplir à des utilisateurs qui, à l’occasion d’une mauvaise manip, insèrent ou enlèvent une cellule
Dans le fichier ci-joint je dois tester que quel que soit les actions que je fais sur le tableau
la valeur de cellule « H20 » soit toujours de 52
Merci d’avance
Cordialement

Jean-Pierre

 

[xhudi69]

Re : vérification permanante de la valeur d’une cellule

Bonjour HUET, le Forum,

En PJ ton fichier, si cela convient.

@+

 

[HUET]

Re : vérification permanante de la valeur d’une cellule

Bonjour.

Merci excellent, mais en pratiquant ta solution je me suis aperçu d'une erreur de ma pare,
dans la cellule "H20" la formule est "=NBVAL(A22:F22)+NB.VIDE(A23:F23)".
Si tu pouvait me donner la nouvelle macro ?

Merci d'avance

Cordialement

Jean-Pierre

 

[JCGL]

Re : vérification permanante de la valeur d’une cellule

Bonjour à tous,

Peux-tu expliquer comment ta formule peut renvoyer 52...

=NBVAL(A22:F22)+NB.VIDE(A23:F23)

A+ à tous

 

[xhudi69]

Re : vérification permanante de la valeur d’une cellule

Bonjour HUET, le Forum,
Bonjour JCGL

Je me suis posé la même question mais bon......
En PJ ton fichier remanié.

@+

 

[HUET]

Re : vérification permanante de la valeur d’une cellule

Bonjour

désolé pour mon erreur la valeur maintenant doit être 12

@+

 

[xhudi69]

Re : vérification permanante de la valeur d’une cellule

Bonjour HUET, le Forum,

BINGO !!

@+

 

[HUET]

Re : vérification permanante de la valeur d’une cellule

Bonjour xhudi69

Merci pour ton fichier mais ça bug !!
Pour résumé ma demande que n'est pas très claire ,je dois vérifier que personne n'ajoute ou retire une cellule de mon tableau mais qui contrairement a ce que j'ai dit en premier peu ajouter ou retirer une ligne entière c'est pourquoi j'ai changer la formule

Cordialement

Jean-Pierre

 

[xhudi69]

Re : vérification permanante de la valeur d’une cellule

Bonjour HUET, le Forum,

Il vaut mieux que tu passes par un UserForm et mettre la feuille Comme suit:

Private Sub Workbook_Open()
Sheets("Feuil1").Visible = xlVeryHidden
End Sub

De cette manière, personne ne peut modifier quoi que ce soit dans cette feuille.

@+

 

[HUET]

Re : vérification permanante de la valeur d’une cellule

Bonjour xhudi69, Le Forum

C'est bon j'ai trouvé la solution en bidouillant le fichier de xhudi69

Merci à tous

Fichier ci-joint
Jean-Pierre