Simplification de procédure de filtrage

Le
Didier NOVARIN
Bonsoir,
Je souhaite simplifier ma procédure en effet :
Au départ, j'ai cela, je souhaite pouvoir supprimer le Select
Je vous remercie
Didier

Range("A2:R" & Range("A5000").End(xlUp).Row).Select
Selection.AutoFilter Field:, Criteria1:="<>"
Selection.AutoFilter Field:, Criteria1:=""
Selection.AutoFilter Field:, Criteria1:=""
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
MichDenis
Le #4491631
with Range("A2:R" & Range("A5000").End(xlUp).Row)
.AutoFilter Field:, Criteria1:="<>"
.AutoFilter Field:, Criteria1:=""
.AutoFilter Field:, Criteria1:=""
End with
Didier NOVARIN
Le #4491451
Merci beaucoup
Bonne journée
Didier

"MichDenis" uN7s%
with Range("A2:R" & Range("A5000").End(xlUp).Row)
.AutoFilter Field:, Criteria1:="<>"
.AutoFilter Field:, Criteria1:=""
.AutoFilter Field:, Criteria1:=""
End with





Publicité
Poster une réponse
Anonyme