Afficher un message
Vieux 30/08/2005, 17h52   #3 (permalink)
2passage
XLDnaute Impliqué
 
Date d'inscription: juin 2005
Version Excel : Excel 2003 (PC)
Messages: 560
Par défaut Re:suppression de toutes les feuilles à la fermetu

Bonjour,

A priori, dans le module de classe thisworkbook, sous l'evenement beforeclose, il suffit de mettre une procédure du type

For each Feuille in ZeClasseur
if Feuille.name <> 'celle que je garde' then feuille.delete
next

ouala
A+

edit : han ! voila.. on traverse sans regarder et on se retrouve sous un Robert :sick: ...

Message édité par: 2passage, à: 30/08/2005 16:54
2passage est déconnecté   Réponse avec citation