rapidité d'execution de code

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 23 Février 2009

• #2

Re : rapidité d'execution de code

Bonjour,

On Error Resume Next
[A:A].SpecialCells(xlCellTypeBlanks).EntireRow.Delete

JB
Formation Excel VBA JB

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 23 Février 2009

• #3

Re : rapidité d'execution de code

Bonjour mumu

essaye peut être le code ci-dessous :

Code:

Range("A1:A" & Range("A65536").End(xlUp).Row).SpecialCells(xlCellTypeBlanks).EntireRow.Delete

bon après midi
@+

 

Vote positif 0 Vote négatif

M

mumu

XLDnaute Occasionnel

• 23 Février 2009

• #4

Re : rapidité d'execution de code

Bonjour Pierrot93 et Boisgontier,

Je vous remercie pour vos réponses mais c'est une solution que j'ai déjà tentée mais ça ne marche pas. Les lignes vides contiennent quand même des formules en relation avec une autre feuille. Peut-être est-ce pour ça.

@ +

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 23 Février 2009

• #5

Re : rapidité d'execution de code

re

essaye peut être ainsi alors, cela devrait te faire gagner un peu de temps...

Code:

Sub test()
Dim s As Long
Application.ScreenUpdating = False
s = Application.Calculation
Application.Calculation = xlCalculationManual
maligne = Range("A65536").End(xlUp).Row
For x = maligne To 1 Step -1
If Range("A" & x) = "" Then Rows(x).EntireRow.Delete
Next
Application.Calculation = s
Application.ScreenUpdating = True
End Sub

@+

 

Vote positif 0 Vote négatif

M

mumu

XLDnaute Occasionnel

• 23 Février 2009

• #6

Re : rapidité d'execution de code

Merci Pierrot93, il est vrai que je gagne un peu de temps avec ta méthode. J'adopte !

Merci à tous !

Mumu

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 23 Février 2009

• #7

Re : rapidité d'execution de code

Salut tatousse

sinon en faisant en tri sur la colonne A avec valeurs vides, tu peux les effacer en 30 sec ...

 

Vote positif 0 Vote négatif

M

mumu

XLDnaute Occasionnel

• 23 Février 2009

• #8

Re : rapidité d'execution de code

Salut Mutzik,

Il est vrai que ce serait très rapide mais j'ai besoin de le mettre dans une macro. Et je n'arrive pas à trouver le code par un autofilter.
Mais finalement, j'ai trouvé le moyen d'utiliser la méthode de Boisgontier et Pierrot93 en le faisant sur une colonne sans formule. Et c'est vrai que c'est super rapide !

Merci à tous !

Mumu

 

Vote positif 0 Vote négatif