Voilà j'ai une fonction pour supprimer les lignes entières d'une feuille excel. Le critère de suppression est de rechercher dans une colonne indiquée les valeur des cellules nulles (rien dans la cellule quoi), et en réaction de supprimer la ligne entière.

Le problème c'est que la boucle ne supprime pas toutes les cellules vides trouvées... Le pire c'est qu'en relançant la fonction plusieurs fois d'affilé, au bout d'un moment on arrive au résultat escompté : il n'y a plus de ligne avec une cellule vide. Mais bon je ne vais pas m'amuser a relancer l'algorythme X fois, sachant que c'est relativement long tout de même...

alors si qqun connait la cause de cette "erreur"...

Voilà le code de la fonction de suppression :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub SupprimerVide(limit As Integer)
 
Dim j As Integer
 
For j = 1 To limit
        If Cells(j, 2).Value = "" Then
        Cells(j, 2).EntireRow.Delete
        End If
    Next j
End Sub
Merci d'avance

[Balises de code rajoutées par Thierry AIM, Merci d'y penser la prochaine fois]