alors, je dois pas être bien loin mais ça veux pas, les boucles...

donc, j'ai des valeurs textes dans une colonne, et à l'impression je veux masquer les lignes s'il n'y a rien dans la colonne correspondante :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Dim cel As Range, c As Range
Set cel = Range("a20:a50")
For Each c In cel
If c = 0 Then
Range(c).EntireRow.Hidden = True
End If
Next
merci pour votre aide