Filtre avancé
Résolu
ti_mouton
Messages postés
153
Statut
Membre
-
ti_mouton Messages postés 153 Statut Membre -
ti_mouton Messages postés 153 Statut Membre -
Bonjour,
Grâce à ce forum, je dispose d'un code me permettant de faire un filtre avancé avec la prise en compte d'un criètere.
Voici le code que l'on m'a donné et qui marche très bien :
Ma base de données "Base SID" compte 17 colonnes (de A à Q), je souhaiterais faire évoluer ce code pour qu'au lieux de filtrer et de copier l'ensemble des 17 colonnes, il ne copie que les colonnes A - B - F - G - H - J - L - M - N - O - P - Q. Les entêtes de colonnes sont inscrites en ligne 5.
Quelqu'un saurait m'aider ? merci pour votre aide
Grâce à ce forum, je dispose d'un code me permettant de faire un filtre avancé avec la prise en compte d'un criètere.
Voici le code que l'on m'a donné et qui marche très bien :
With Sheets("Base SID")
Set Plage = .Range(.Cells(5, 1), .Cells(.Cells(.Rows.Count, 1).End(xlUp).Row, 17))
Plage.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("BRADERIE").[B1:B2], CopyToRange:=Sheets("BRADERIE").[B7], Unique:=False
End With
Ma base de données "Base SID" compte 17 colonnes (de A à Q), je souhaiterais faire évoluer ce code pour qu'au lieux de filtrer et de copier l'ensemble des 17 colonnes, il ne copie que les colonnes A - B - F - G - H - J - L - M - N - O - P - Q. Les entêtes de colonnes sont inscrites en ligne 5.
Quelqu'un saurait m'aider ? merci pour votre aide
1 réponse
-
Bonjour
Un filtre avancé ne peut pas fonctionner sur des colonnes disjointes. Ce que je vous propose, c'est de conserver votre filtre avancé sur l'ensemble des colonnes, puis à l'aide d'une macro (vous pouvez utiliser l'enregistreur de macro), supprimer ou masquer les colonnes que vous ne voulez pas voir.
Cdlt
