taille fichier

A

a10

XLDnaute Impliqué

• 6 Janvier 2019

• #2

Plus de 255000KO

 

Vote positif 0 Vote négatif

cp4

XLDnaute Barbatruc

• 6 Janvier 2019

• #3

a10 à dit:

Plus de 255000KO

Cliquez pour agrandir...

Il faut faire un bon ménage de tout ce qui est superflu.
Ta question est aussi floue. Tu es le seul à savoir ce que tu as dans ton fichier.
Essaie toi de m'aider sans que tu saches ce qu'il y a dans mon fichier.
Tu peux essayer d'enregistrer ton fichier au format xlsb.

Je ne peux t'aider plus que ça.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 6 Janvier 2019

• #4

Bonjour a10, cp4,

Une macro classique :

Code:

Sub Epurer()
Dim w As Worksheet, i&
For Each w In Worksheets
    If w.[A1].Formula = "" Then w.[A1] = " "
    i = w.Cells.Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
    w.Rows(i + 1).Resize(w.Rows.Count - i).Delete
    i = w.Cells.Find("*", , xlFormulas, , xlByColumns, xlPrevious).Column
    w.Columns(i + 1).Resize(, w.Columns.Count - i).Delete
    With w.UsedRange: End With 'actualise les barres de défilement
Next
End Sub

A+

 

Vote positif 0 Vote négatif

A

a10

XLDnaute Impliqué

• 7 Janvier 2019

• #5

Bonjour,

En cherchant sur le NET, il n'y a pas de risques en enregistrant en XLSB ?

A quoi sert la macro ?

merci a+

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2019

• #6

a10 à dit:

A quoi sert la macro ?

Cliquez pour agrandir...

Devinez.

 

Vote positif 0 Vote négatif