Reporter automatiquement le nom d'une cellule filtrée

Bonjour,

Je souhaite qu'apparaisse sur ma feuille de calcul le nom de la cellule qui est filtrée. Ex : F2 a comme nom "sem 5" et par l'intermédiaire d'une formule, je souhaite faire apparaitre "sem 5" automatiquement dans la cellule B16 lorsque je filtre la cellule F2. Voir tableau joint.

merci pour votre temps passé sur ma demande et merci d'avance pour votre réponse.

Cdlt

Sophie

Bonjour. Bienvenue sur le Forum

Avec un Code de Feuil1

Private Sub Worksheet_Change(ByVal Target As Range) 
If Not Application.Intersect(Target, Range("B15:K15")) Is Nothing Then 
Sheets("Feuil1").Range("B31") = Target.ValueEnd If 
End Sub 

Cordialement

Bonjour,

Je vous remercie pour votre réponse, mais je n'ai rien compris. Est-il possible de l'expliquer en français ?

Merci

Cdlt,

Sophie

bonjour

c'est vrai qu'il y avait du vba en français ........ avec des <<

alors une autre approche avec une MFC et un bouton pour lancer

cordialement

Bonjour

Private Sub Worksheet_Change(ByVal Target As Range) 
If Not Application.Intersect(Target, Range("B15:K15")) Is Nothing Then 
Sheets("Feuil1").Range("B31") = Target.ValueEnd If 
End Sub 

En français, cela signifie que lorsque une cellule de la plage B15:K15 est validée, sa valeur apparaît en B31.

Es(tu plus avancée maintenant?

cordialement