Bonjour,

J'ai une macro très très classique qui masque les lignes pour lesquelles la colonne D contient "o".
Ma macro fonctionne et j'ai essayé de délimiter au mieux la zone de recherche pour optimiser la vitesse d'exécution, mais c'est toujours trop lent (environ 5 secondes pour 1000 lignes).

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
With Application
            .EnableEvents = False
            .Calculation = xlCalculationManual
            .ScreenUpdating = False
            .DisplayStatusBar = False
        End With
        ActiveSheet.DisplayPageBreaks = False
 
LstRw = Range("LstRw").Row ' la dernière cellule de mon fichier est nommée
    For Each c In Range("D1:D" & LstRw)
        If c.Value = "o" Then c.EntireRow.Hidden = True
    Next
Je ne trouve rien de satisfaisant
Comment faire pour optimiser au mieux cette macro s'il vous plait ?