Fichier très lent (inutilisable), une idée ?

Question

Je lance une bouteille à la mer au cas où Je récupère ce fichier, créé au départ sous Office 2000 peut être. Ce fichier est très lent pour se déplacer dans la feuille ou saisir des infos. J'ai supprimé les macros qu'il contenait (pas besoin) : pas mieux Je ne vois pas ce qui peut ralentir autant ce fichier. Et aussi, pourquoi est il si lourd, avec si peu de données ?... D'ailleurs, je ne peux pas uploadé le fichier sur le forum, 2mo, ca ne passe pas. Je laisse un lien dropbox pour accéder au fichier : https://www.dropbox.com/s/kksm0mleufkdiqa/Fichier.xlsx?dl=0 Si jamais quelqu'un à une idée... Pour info, je n'ai besoin que des données du fichier, je n'arrive pas à les copier dans un nouveau fichier, mais si quelqu'un y arrive... Merci d'avance. Bonne soirée...

eriiic · Answer

Déjà tes MFC se fragmentent, suite sans doute à des couper, insérer, etc. C'est une cause de ralentissement, pas encore critique ici (20-30 environ) Par contre tu as 71000 objets sur ta feuille. Je te mettrais bien la macro mais pour l'instant mon excel comate à te les enlever et je ne peux te la copier , et te confirmer la cause tant qu'il n'a pas fini. Il va falloir revoir tes macros sur ces 2 points eric...

Jean-Eric · Answer

Bonjour Eric, Ton fichier après suppression des MFCs (mises en forme conditionnelles) et des shapes (formes) au nombre de 71.095 !... +/- 13 minutes pour tout nettoyer. Cdlt...

eriiic · Answer

Salut jean-eric,

Je l'avais abandonné à son triste sort de travailleur laborieux

De retour après 2h il avait fini

La macro de nettoyage des formes uniquement :

Sub suppShapes()
    MsgBox ActiveSheet.Shapes.Count & "objets sur la feuille"
    For Each ObjF In ActiveSheet.Shapes
        ObjF.Delete
    Next ObjF
End Sub

Attention, ça vire tout sans prévenir. Grand nettoyage, adapter pour un besoin plus fin

eric