Comment Ecrire cette formule?

[la croisée des pains]

Bonjour à tous,

je voudrais savoir comment écrire cette formule en vba ou autre:

Cellule A1= Toto
Plage = A2😀14

Si dans la cellule A1 est écris toto, effacé la plage(A2😀14) sauf les cellules de celle-ci ou est écris toto.

merci de votre aide

lolo

 

[la croisée des pains]

Re : Comment Ecrire cette formule?

re,

merci Wilfried, c'est impeccable, super génial....

je voudrais maintenant d'aprés ta formule:

sub efface()
dim cel as range
for each cel in range("B10:M14")
if cel<>range("B1") then
cel.interior.colorindex = 2
cel.font.corlorindex = 2
end if
next
end sub

cela masque le planning et le faire réaparraitre...(en le demasquant) en cliquant sur un bouton.

j'ai essayé d'integrer ton code pour les 3 cellules mais je n'y suis pas arriver.

lolo

 

[wilfried_42]

Re : Comment Ecrire cette formule?

re:

voici ton fichier en retour

J'ai fait la macro du reaffichage complet

 

[la croisée des pains]

Re : Comment Ecrire cette formule?

re,

juste un mot génial
merci encore, plus qu' a le faire pour tous les cellules.

@+ Wildfried

lolo