Discussion :

[collinchris]

Bonjour à tous,
Je débute en vba excel et je rencontre des difficultés pour filtrer des lignes non adjacentes à la ligne d'étiquettes. J'aimerais faire un filtre automatique sur la ligne 1 de ma feuille excel qui ne tiendrait pas compte des lignes 2 à 27. Est-ce possible et est-ce que quelqu'un pourrait venir à mon secours?
Je vous remercie par avance,

[asxasx]

As tu essayé en faisant une sélection de ta zone a filtrer en appliquant un filtre sur la sélection ?

[collinchris]

Merci pour cette suggestion.
Je viens de la tester mais ca positionne mon filtre sur la ligne 28 alors que je voudrais qu'il se trouve sur la ligne 1 (en fait les lignes 2 à 27 vont être masquées et verrouillées). Le but est que l'utilisateur ne puisse pas les faire apparaître en utilisant le filtre automatique. Je sais pas si je suis très claire....

[asxasx]

Dans ce cas s'il ne doit pas les voir du tout, pourquoi ne pas les couper-coller dans une feuille cachée de type xlSheetVeryHidden

Genre avant d'appliquer ton filtre tu sélectionnes tes lignes tu fais un couper coller vers une autre feuille :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Application.ScreenUpdating = False
Sheets("data").Visible = xlSheetVisible
Sheets("feuille_visible").Rows("2:27").Cut Destination:=Sheets("data").Rows("1:26")
Sheets("feuille_visible").Rows("2:27").Delete Shift:=xlUp
Sheets("data").Visible = xlSheetVeryHidden
Application.ScreenUpdating = True

Un truc du genre devrait pouvoir faire l'affaire mais à adapter parce que fait de tête donc peut etre qu'il y a erreur.

[collinchris]

Ca va pas être possible parce que ces lignes cachées me servent à construire des tableaux croisés dynamiques.

[asxasx]

Ah ça je connais pas, mais il n'y a pas moyen de faire un TCD à partir de cellules d'une autre feuille ?

[collinchris]

J'avais également pensé à cette solution mais comme je créé 5 TCD avec cette même feuille et que je fais référence à plusieurs critères, c'était ingérable. Merci quand même pour ton aide, je vais continuer de creuser. Bonne journée