XL 2016 VBA - Est-il possible de récupérer toutes les valeurs de filtre possible sans parcourir la colonne

[Dudu2]

Bonjour,

Supposons un colonne qui peut être filtrée et qui est ou non filtrée.
Peut-on récupérer toutes les valeurs listées dans la liste déroulante du filtre sans parcourir les données.

Soit ce tableau:

Je voudrais récupérer ça:

ou

 

[laurent950]

Dudui2 ne veut pas la sélection mais la liste complète du filtre

Avec le module de classe, c'est simple de modifier très rapidement le resultat.

Tu trouves que ce n'est pas clair ?

non !

 

[Dudu2]

@ Bernard_XLD
C'est fou ! 2 classeurs avec strictement le même code. Un plante et pas l'autre !
Et c'est pas Workbook vs Wbk car même avec Wbk ça plantait aussi dans Classeur1.

 

[Bernard_XLD]

@Bernard_XLD

TabValeursUniques = TabValeursUniquesColonneTS(ActiveSheet.ListObjects(1), 2)

Même punition sur la colonne 2.
De toutes façons VBA sait différencier un nom de variable d'un type.
Regarde la pièce jointe 1222434

si le segment existe déjà, il faut le supprimer avant de lancer la macro ou ne pas le recréer s'il existe sinon erreur, le nom est forcément unique, pas deux segments du même nom

 

[Bernard_XLD]

c'est cela d'ailleurs, en chargeant ton fichier

 

[laurent950]

Voila @Dudu2 @Bernard_XLD

C'est fou ! 2 classeurs avec strictement le même code. Un plante et pas l'autre !
Et c'est pas Workbook vs Wbk car même avec Wbk ça plantait aussi dans Classeur1.

 

[Dudu2]

@Bernard_XLD,
Evidemment ! Merci d'avoir éclairci ce mystère qui commençait à me mettre les nerfs à vif 😱
Sur mon petit écran les Segments sont hors zone, pas visibles.

 

[Dudu2]

@laurent950,
Je regarde demain matin. Là, fatigue.
Bonne soirée à tous.