je souhaiterai effacer les lgnes entieres de mon tableau si la valeur de la cellule est egale à 0.

le code ci dessous ne marche pas...


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
For h = 2 To 26
 
If Cells(h, k + 2).Values = 0 Then
Rows(h).Delete
End If
Next h