Sujet Précédent Sujet Suivant

[Excel] Alléger des fichiers

Résolu/Fermé
Alex_Mansion82 Messages postés 370 Date d'inscription lundi 21 décembre 2009 Statut Membre Dernière intervention 24 octobre 2012 - 17 févr. 2010 à 11:50
Alex_Mansion82 Messages postés 370 Date d'inscription lundi 21 décembre 2009 Statut Membre Dernière intervention 24 octobre 2012 - 17 févr. 2010 à 14:27
Bonjour,

Dans un souci d'économiser de la place sur le serveur de la société pour laquelle je bosse, tout les moyens sont bons pour réduire la taille des fichiers.

Je viens de trouver une centaine de fichiers Excel, qui pèsent chacun 50-55 Mo. Ils contiennent tous des tableaux croisés dynamiques ainsi que de très nombreuses liaisons entre eux.

Pour réduire la taille, je sais que je peux "casser" les liaisons pour ne garder que les valeurs, et faire pareil pour les tableaux croisés. Hors je me vois pas passer les fichiers un à un pour faire cela.

Existerait il un utilitaire qui s'en charge ou Excel saurait il le faire tout seul comme un grand ?

En vous souhaitant une bonne journée.
A voir également:

1 réponse

Réponse 1 / 1
Alex_Mansion82 Messages postés 370 Date d'inscription lundi 21 décembre 2009 Statut Membre Dernière intervention 24 octobre 2012 94
17 févr. 2010 à 14:27
Bon ben j'ai trouvé de moi-même la solution :

Sub Nettoie()
Dim Sht As Worksheet

For Each Sht In Worksheets

Sht.Select
Sht.Cells.Copy
Sht.Cells.PasteSpecial (xlPasteValuesAndNumberFormats)

Next Sht

ActiveWorkbook.Save

End Sub
0