Bonjour à tous !
J'ai vu que plusieurs sujets sont comme le mien mais je n'arrive pas à appliquer vos solutions alors je viens ici vous exposer mon problème, j'ai un cafouillage dans ma syntaxe je pense.
J'ai un tableau avec un certain nombre de lignes et lorsque la cellule de la colonne 4 contient un 0 ou "", je voudrais supprimer totalement la ligne.
J'ai tenté avec :
et cela me mets une erreur au niveau de "rows(h).delete"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 For h = 0 to count 3 If Workbooks("Fichier.xls").sheets(1).cells(h+1,4).Value = "" Or _ Workbooks("Fichier.xls").sheets(1).cells(h+1,4).value = 0 Then Rows(h).delete h=h+1 End If Next
Ensuite en suivant vos solutions j'ai tenté :
Cela ne me mets pas d'erreur mais cela ne change rien à mon tableau. J'avoue que je ne sais pas comment utiliser la dernière formule donc il y a forcément une erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 For h = cells(Count3,1).End(xlUp).Row To 2 If Cells(h,4) = "" Or Cells(h,4)=0 Then Rows(h).Delete End If Next
Ce que je voudrais en fait c'est, en partant du bas comme vous le conseillez, allez de "count3" qui est ma dernière ligne, à la ligne 2, puisque mon tableau contient un titre. Et je voudrais supprimer toutes les lignes qui contiennent en colonne 4 un 0 ou plus précisément un 0,00%.
Voilà, j'espère avoir été assez claire, je vous remercie beaucoup par avance !
Iloon
Partager