> Tous les forums > Forum Bureautique
 Taille de fichier excel différente
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
yojema
  Posté le 18/05/2018 @ 18:56 
Aller en bas de la page 
Astucien

Bonjour le forum

Un problème pas grave en soi j ai 2 fichier excel quasi identique l 'un est affiche a 1 ,5 MO et l autre a presque 24 MO ???

je viens d essayer plusieurs manip consistant par exemple à enlever toute les couleurs de toute les feuilles puis enregistrer sous un autre nom histoire de voir la différence

a verifier qu'il n'y a pas d image planquer et je ne vois pas ce qui fait que ce fichier et tellement plus lourd c est un peu chiant il fait "ramer excel a l'ouverture

la différence entre les 2 est de 8 colonnes supplémentaires de données sur 365 ligne avec des formules dans 2 feuille de calcul

je precise aussi que des colonnes j en ai déjà 30 au départ et que dans le fichier ça porte le nombre a 38 colonnes

mais je vais aller verifier la mise en forme conditionnel quel ne soit pas encours sur les 105000 lignes

mais au cas ou vous auriez des suggestion en attendant j'ouvre le post

merci a plus !

Publicité
galopin01
 Posté le 18/05/2018 à 19:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

bonjour,

Pour cette taille ça peut bien être des résidus de tes bricolages successifs, Les suppressions en particulier génèrent souvent des zombis de données qui alourdissent considérablement Excel, Et c'est encore pire si tu supprimes des contrôles, boutons, images, graphiques...

Tu peux peut-être essayer d'appliquer cette macro :

Sub NettoieEtDerniereCellule() ' Laurent Longre 2000
Dim Sht As Worksheet, DCell As Range, Calc As Long, Rien As String
On Error Resume Next
Calc = Application.Calculation
With Application
.Calculation = xlCalculationManual
.StatusBar = "Nettoyage en cours..."
.EnableCancelKey = xlErrorHandler
.ScreenUpdating = False
End With
For Each Sht In Worksheets
If Sht.UsedRange.Address <> "$A$1" Or Not IsEmpty(Sht.[A1]) Then
Set DCell = Sht.Cells.Find("*", , , , xlByRows, xlPrevious)(2)
If Not DCell Is Nothing Then
Sht.Range(DCell, Sht.Cells([A:A].Count, 1)).EntireRow.Clear
Set DCell = Nothing
Set DCell = Sht.Cells.Find("*", , , , xlByColumns, xlPrevious)(, 2)
If Not DCell Is Nothing Then Sht.Range(DCell, Sht.[IV1]).EntireColumn.Clear
End If
Rien = Sht.UsedRange.Address
End If
Next Sht
Application.StatusBar = False
Application.Calculation = Calc
End Sub

A+

yojema
 Posté le 18/05/2018 à 20:40 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Hello Galopin

Essayer a 2 reprise excel a planté a 2 reprise je verrais ça une prochaine fois il est bientôt 21 h

fini boulot

mais merci pour le coup de main !

Constance
 Posté le 18/05/2018 à 22:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Salut .o/

Tes fichiers sont dans le même format, ou bien n'y aurait-il pas par hasard l'un en .xls et l'autre en .xlsx (ou .xlsm ou autre variante) ?

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
83,99 €Webcam Logitech StreamCam à 83,99 €
Valable jusqu'au 28 Juin

Amazon fait une promotion sur la Webcam Logitech StreamCam qui passe à 83,99 €. On la trouve ailleurs à partir de 96 €. 

La Logitech StreamCam diffuse et enregistre des vidéos saisissantes et réalistes avec des mouvements fluides et des détails nets en Full HD 1080p à 60 fps. De plus, elle offre la possibilité de passer instantanément en mode portrait afin de filmer en format 16:9. Offrant de nombreuses possibilités, elle est idéale pour filmer sur Twitch, Facebook ou encore Instagram.

Intégrant la reconnaissance faciale pilotée par l'IA, vous obtenez une mise au point et une exposition nettes, quelle que soit votre position. L'exposition automatique est réglée avec précision pour vous montrer sous un jour flatteur dans des conditions d'éclairage variées.


> Voir l'offre
9,83 €Ensemble de 19 forêts HSS PointTeQ (de 1 à 10 mm) pour métal à 9,83 €
Valable jusqu'au 28 Juin

Amazon fait une promotion sur l'ensemble de 19 forêts HSS PointTeQ (de 1 à 10 mm) pour métal qui passent à 9,83 € au lieu de 15,49 €.


> Voir l'offre
29,49 €Jeu Nintendo Switch Metroid Dread à 29,49 €
Valable jusqu'au 28 Juin

Cdiscount fait une promotion sur le jeu Nintendo Switch Metroid Dread qui passe à 29,49 € au lieu de 44,99 €. 


> Voir l'offre

Sujets relatifs
Excel 2000 - taille fichier xlsx
outlook 2010 : fichier .pst atteint sa taille maximale
un fichier excel.xlsm est-il exécutable sur un Mac ?
Impossible ouvrir fichier Excel
comment remettre un fichier Excel 2003 en lecture normale
mettre un "titre" en haut du fichier excel
Réduire le ruban d’un seul fichier Excel
Pb envoie fichier excel
Impossible d'ouvrir un fichier EXCEL
Macro enregistrement fichier Excel
Plus de sujets relatifs à Taille de fichier excel différente
 > Tous les forums > Forum Bureautique