bonjour

j'essaye de suprimer les lignes vides de mon tableau

j'ai tester ce code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Numdl = Range("a65536").End(xlUp).Row 'pour recupere le dernier numero de la ligne
For i = Numdl To 2 Step -1
 If ActiveCell Is Empty Then Rows.Delete
 Next i
mais hélas ça plante

merci pour votre aide