Autres (RESOLU) Afficher la valeur filtrée dans une cellule

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

chaelie2015

XLDnaute Accro
Bonjour Forum
ci rattaché fichier exemple, je souhaite afficher le titre filtré dans une cellule.
exemple :
si je sélectionne dans le filtre de la colonne F que A alors afficher dans G2 = A et ainsi de suite.
Merci par avance
 

Pièces jointes

Solution
Bonjour chaelie2015,

On peut utiliser cette fonction VBA :
VB:
Function ListeFiltre(r As Range) As String
Dim d As Object
Set d = CreateObject("Scripting.Dictionary")
d.CompareMode = vbTextCompare 'la casse est ignorée
For Each r In r
    If Not r.Rows.Hidden And CStr(r) <> "" Then d(r.Value) = ""
Next
ListeFiltre = Join(d.keys, " - ") 'concaténation
End Function
A placer dans un module standard.

A+
Bonjour,

Votre formule est un peu lourde, il vaut mieux :
Code:
=SIERREUR(NOMPROPRE(TEXTE(--("1/"&A5);"mmm"));"")
A+
Il doit y avoir une erreur, la formule renvoie un blanc alors qu'elle pointe une case comportant une date ? Ce que je souhaite c'est ne rien afficher si la colonne date n'est pas saisie Est-ce que la fonction Sierreur gère ça ? Certes ma formule est plus lourde mais la fonction choisir permet de personnaliser les abréviations.
Bien à vous.
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
110
Retour