Bonjour,

Voici on code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub FACTURES_Bouton9_Cliquer()
Dim c As Range
 Application.ScreenUpdating = False
For Each c In Worksheets("FACTURES").Range("$H2:$H1350")
        With c
                .EntireRow.Hidden = False
                If .Value <> "" Then .EntireRow.Hidden = True
        End With
Next c
 Application.ScreenUpdating = True
 
End Sub

Je cherche le moyen de mettre une condition supplémentaire, à savoir que la colonne "E" doit obligatoirement être remplie (ici avec des nombres)

Qui peut m'aider ?

Merci.

Bonne journée.