Clear Worksheet excepté certaines cellules

[AdienP]

Bonjour,
J´ai un fichier Excel dans lequel j´utilise pas mal de Macro, notamment des extractions.
Chaque fois que j´utilise mes macros, la taille de mon fichier augmente.
Je voudrais donc a la fin de mes macro nettoyer les onglets.
Je sais comment nettoyer une feuille, par contre comment fait on pour nettoyer l´ensemble d´une feuille excepté certaines cellules?

Merci

AdrienP

 

[vgendron]

Re : Clear Worksheet excepté certaines cellules

Bonjour,

Je ne sais pas si ca peut se faire avec une commande spéciale. mais comme ceci. peut etre??
tu protèges les cellules à garder, tu effaces tout (donc j'imagine que les cellules protégées ne le seront pas) ensuite tu enlèves la protection?

 

[AdienP]

Re : Clear Worksheet excepté certaines cellules

Bonjour,

Merci pour la réponse. Bonne idée, par contre j'aimerais bien faire ça en VBA pour que ça se fasse directement a la fin de ma macro?

 

[Eric_nov]

Re : Clear Worksheet excepté certaines cellules

Bonjour,

Je ne sais pas si cette exemple peut t'aider mais en sélectionnant la feuille, les onglets et les cellules à effacer ça marche. Je l'ai fait chez moi pour un planning annuel mais avec un bouton effacer. Une idée à adapter à ta macro.

Sheets(Array("01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12")).Select
Range("D3😀33,E3:E33,k15,k18").Select
Selection.ClearContents

 

[AdienP]

Re : Clear Worksheet excepté certaines cellules

Bonjour,

Je ne sais pas si cette exemple peut t'aider mais en sélectionnant la feuille, les onglets et les cellules à effacer ça marche. Je l'ai fait chez moi pour un planning annuel mais avec un bouton effacer. Une idée à adapter à ta macro.

Sheets(Array("01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12")).Select
Range("D3😀33,E3:E33,k15,k18").Select
Selection.ClearContents

Oui merci je pense que je vais faire du VBA comme ca en définissant le range avec précision comme tu l´as fait.

 

[Pierrot93]

Re : Clear Worksheet excepté certaines cellules

Bonjour à tous,

A noter qu'un "clear" serait sans doute préférable à un "clearcontents"... supprimera en plus du conenu la mise en forme...

bon après midi
@+