Option Explicit
Sub Masque()
Dim Lig&, DerL&
DerL = Feuil3.Range("C65000").End(xlUp).Row
Cells.EntireRow.Hidden = False
For Lig = DerL To 4 Step -1
If Cells(Lig, 3) = "" Then Rows(Lig).EntireRow.Hidden = True
Next
End Sub
C'est ça...Je n'ai plus qu'à adapter vos macros à mon projet et c'est bon.
Va bien falloir un jour que je mette mon nez dans un bouquin de VBA pour apprendre seul, mais je ne sais pas quoi acheter.
Avez vous une idée. Je ne suis pas débutant en programmation, mais je travaillais sur de gros IBM en Screen Architect et en EXEC.
Merci