Supprimer les cellules sur une plage donnée

[gibtoul]

Bonjour

J'ai un fichier excel qui au fur et a mesure de son utilisation prend de l'embompoint (Actuellement env 20Mo.)
Je pense qu'il à pris du poid car je dois avois des cellules non vides (quine sont pas essentiel) un peu partout sur tout mes onglets

Vu qu'avec Excel 2010 , le nbre de ligne et colonne à évoluer, est il possible par une macro
de definir par exemple de la ligne 100 à la derniere tout est effacer (valeur, mise en forme) et de la colonne H à la derniere idem

J'ai utilisé la macro suivante :

Sub supprime()
Dim L As Long
Application.ScreenUpdating = False
For L = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1
If Trim(Cells(L, "B")) = "" Then Rows(L).Delete
Next
End Sub

Mais j'ai un message m'indiquant de sellectionner moins de donnée

Merci pour votre aide

A très bientot

Gibtoul

 

[Gurgeh]

Re : Supprimer les cellules sur une plage donnée

Salut gibtoul,

J'ai essayé ton code qui fonctionne bien chez moi.

Je pense que tu devrais nous mettre un fichier joint pour que l'on puisse t'aider.

Gurgeh