Bonjour à tous!
S'il vous plait: Comment demander à une macro de ne pas copier le résultat d'un filtre si celui-ci est VIDE????????
Voici ma formule qui copie le filtre et le ramène sur un autre onglet:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Sub Import_Data() Application.ScreenUpdating = False Worksheets("Brouillard").Activate With Worksheets("Pneus") 'Si la feuille de calcul est en mode filtre, on affiche toutes les lignes de la liste actuellement filtrée If .FilterMode = True Then .ShowAllData .Range("PNEUMATIQUE[[#Headers],[#Data]]").AdvancedFilter Action:=xlFilterCopy _ , CriteriaRange:=Range("Criteres2"), CopyToRange:=Range("A916").Offset(1, 0), Unique:=False End With End Sub
Partager