Bonjour,
J'utilise actuellement ce code pour masquer des lignes (merci à ceux qui m'ont aidé).

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub Masquer()
Dim i As Long
    For i = 11 To Rows.Count
        If Range("A" & i).Text = "" Then Exit For
            If Range("C" & i).Value = "Archivé" Then
            Rows(i).Hidden = True
        End If
    Next i
End Sub
Comme j'ai beaucoup de lignes, je le trouve assez lent et j'ai l'impression qu'après avoir testé une ligne, il retourne à l'origine avant de redescendre lire la ligne suivante.
Après avoir testé une ligne, n'est-il pas possible de :
- lire immédiatement la ligne suivante,
- si la cellule A est vide, alors sortir sinon
- si la cellule C est égale à "Archivé", masquer toute la ligne sinon passer à la suivante.
Cela est-il possible? et si oui, comment modifier le code?
A l'avance, merci.