Re : Accélerer macro avec un tableau
Merci pour vos réponses,
Pierrot, ton code est en effet plus court, plus structuré et un peu plus rapide que le mien.
Gorfael, c'est vrai, tu as raison, je n'y avais pas pensé, l'idéal serait de le mettre en macro (j'ai plusieurs profils d'affichage de lignes associé à une liste déroulante). Avec l'enregistreur, celà donne ceci :
Sub Macro1()
Columns("B:B").Select
Selection.AutoFilter
ActiveSheet.Range("$B$1:$B$540").AutoFilter Field:=1, Criteria1:=Array("0", "1", "3"), Operator:=xlFilterValues
End Sub
Le Range("$B$1:$B$540") peut être remplacé par Range("B1:B" & Range("B65536").End(xlUp).Row) => nickel
par contre, je ne peux effectuer de copier-coller et de déplacer-insérer pendant que le filtre est actif.
En plus, si je désactive le filtre, toutes les lignes réapparaissent dans la configuration précédente.
N'y a-t-il pas possibilité, après filtrage, de garder les lignes que l'on veut masquées, mais sans avoir les numéros de ligne en bleu (signifiant que le filtre est actif) ?
Merci d'avance pour vos réponses.