Une des raisons pour laquelle un classeur est très volumineux c'est à cause d'un grand nombre de styles de cellules personnalisés.
Il est possible de supprimer chaque style un par un en faisant un clic-droit.
Mais si le nombre de styles est très important, il existe une technique pour les supprimer tous mais qui peu rendre votre inutilisable si vous faites la moindre erreur. C'est cette technique qui est décrite dans cet article.
Mise en garde
La technique décrite ici va consister à éditer et modifier le fichier XML du classeur Excel.
Si la moindre erreur de caractère est effectuée, le classeur sera corrompu et vos données perdues. Faîtes donc très attention aux modifications que vous allez effectuer❗❗❗❗
Méthode pour supprimer tous les styles de cellules
- Dupliquez le classeur dans lequel vous souhaitez supprimer tous les styles de cellules personnalisés
- Renommer l'extension de la sauvegarde en .zip
- Double-cliquez sur le fichier zipper pour ouvrir toute l'architecture XML du fichier.
- Dans le répertoire xl, copiez le fichier styles.xml et collez le dans un répertoire séparer ou sur le bureau
- Ouvrez le fichier dans un éditeur de texte (ici Notepad++) avec son l'extension XML Tool pour visualiser la hiérarchie du fichier XML
- Recherchez la balise cellStyles. Notez au passage le nombre de styles de cellules que votre classeur contient (ici 70 styles personnalisés)
- Supprimez toutes les lignes entre les balises <cellStyles> et </cellStyles>, y compris les balises
- Sauvegardez le fichier styles.xml
- Ré-importez le fichier styles.xml dans le fichier zipper et bien sûr dans le même répertoire, le répertoire xl
- Changez l'extension du fichier zip en xlsx (l'inverse de l'étape 2)
- Effectuez une prière 🙏 pour que le fichier s'ouvre (ça peut aider)
- Ouvrez le fichier et tous les styles de cellules personnalisés ont été supprimés 😍😎😀
D'où viennent ces styles ?
En fait, on retrouve ce genre de problème avec des classeurs créés avec l'extension xls. Et ce cas arrive plus souvent qu'il n'y paraît.
Au moment de la conversion d'un fichier xls vers un fichier xlsx, les cellules avec des styles particuliers ont été converti en style de cellules personnalisés.
Mais surtout, ces styles sont automatiquement importés dans un classeur quand une feuille de calcul est importée depuis un autre classeur.
28/10/2021 @ 16:50
Bonjour,
ou alors, en VBA :)
Sub SupprStyles()
Dim St As Style
For Each St In ActiveWorkbook.Styles
If Not St.BuiltIn Then St.Delete
Next St
End Sub
28/10/2021 @ 17:36
Moouuui ... Oui c'est exact mais ça nécessite que l'utilisateur connaisse déjà l'interface de l'éditeur VBA (et je peux vous assurer que ce n'est pas le cas de tout le monde)
Ensuite, avec la technique que je décris, on connait le nombre de style existant. Et surtout, et malgré que j'ai écris un livre sur les macros aux éditions ENI, Microsoft ne va pas conserver le VBA dans les années futures. Donc, nulle part dans mon site je parle de VBA quand il existe une autre solution.
28/10/2021 @ 17:51
C'est clair, mais c'était très court à écrire alors je n'ai pas pu résister :)
trés bon site sur Excel, merci pour ces astuces !
06/05/2021 @ 11:01
Merci je vous dois une fière chandelle ; j'avais commencé à enlever les styles 1 par 1... en consultant le xml, j'ai vu qu'il y en avait 15020
:-)
06/05/2021 @ 11:19
Content que ça vous ai aidé. Ce n'est évidemment pas l'article le plus populaire de mon blog vu sa complexité technique, mais face à ce genre de situation, j'ai bien été obligé d'expliquer l'astuce pour nettoyer complètement un fichier de ses styles.