Comment Supprimer de toutes les feuilles sauf 3???

[Yochma]

Rebonsoir à toutes et à tous!!!

Certains ne verront mon messages que demain mation donc Bonjour lol!!!

J'ai deux questions qui me paraissent difficile mais qui pour certain d'entre vous provoqueront un fou rire de simplicité mais bon je me lance!!!

1-- Comment faire par macro pour supprimer toutes les feuilles d'un classeur sauf 3 d'entre elles qui pourrai se nommer Riri Fifi et Loulou par exemple??????


2-- Comment appliquer une macro de formatafe par exemple à toutes les feuilles d'un classeur sauf 3 qui se nommeraient Riri Fifi et Loulou par exemple??????



Merci de votre aide a toutes et à tous!!!


Longue vie au forum


@+

Yochma

 

[yeahou]

Re Bonjour Yochma

Je ne sais pas si tu le sais mais il y a une fonction de recherche sur le forum et les exemples sont légions.

pour ce problème, tu peux utiliser une boucle du type

for each feuille in activeworkbook.worksheets
if feuille.name ="riri" or feuille.name="fifi" or feuille.name="loulou" then
'code à exécuter sur riri, fifi et loulou
else
'code à exécuter sur les autres feuilles
end if
next feuille

Cordialement, A+