marsboul2d
XLDnaute Nouveau
Bonjour à tous !
J'ai réalisé une Macro à l'aide d'un enregistrement. Dans cette macro, je copie les 5 premières lignes d'un tableau dans lequel j'applique un filtre. Mon problème : les données du tableau change d'une semaine à l'autre, ainsi lorsque j'applique mon filtre en Semaine 1, les 5 premières ligne que je veux copier sont dans le rectangle C4:J14 (correspond aux ligne 4,7,10,11,14). En semaine 2 ces lignes pourraient être totalement différentes. Ainsi, lorsque j'applique ma Macro, au lieu de me sortir les 5 premier résultat, il me sort les 3 premiers seulement. Comment faire pour copier les 5 premières lignes en omettant les lignes cachées ?
Merci pour votre retour
J'ai réalisé une Macro à l'aide d'un enregistrement. Dans cette macro, je copie les 5 premières lignes d'un tableau dans lequel j'applique un filtre. Mon problème : les données du tableau change d'une semaine à l'autre, ainsi lorsque j'applique mon filtre en Semaine 1, les 5 premières ligne que je veux copier sont dans le rectangle C4:J14 (correspond aux ligne 4,7,10,11,14). En semaine 2 ces lignes pourraient être totalement différentes. Ainsi, lorsque j'applique ma Macro, au lieu de me sortir les 5 premier résultat, il me sort les 3 premiers seulement. Comment faire pour copier les 5 premières lignes en omettant les lignes cachées ?
Code:
ActiveSheet.Range("$A$2:$J$253").AutoFilter Field:=8, Criteria1:=">10", _
Operator:=xlAnd
ActiveWindow.SmallScroll Down:=-3
Range("C4:J14").Select
Selection.Copy
Sheets("Semaine - Stats").Select
Range("A6").Select
Merci pour votre retour