nommer feuille graphique

[jeffe]

Bonjour à tous, je cherche à renommer des feuilles graphiques avec le meme nom contenu dans differentes cellules
ces feuilles peuvent etres deplacées (donc pas d'ordre possible) la seule chose qui ne varie pas, c'est la reference des graphs par rapport à la ligne source.
merci

 

[Dranreb]

Re : nommer feuille graphique

Bonjour.
Si ce ne sera pas "'Text Box 25" dans tous les graphiques qu'est-ce que vous voulez qu'on y fasse ?
Si bizarrement c'est le cas plutôt que d'être le titre du graphique :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Graph As Chart
On Error Resume Next
For Each Graph In ThisWorkbook.Charts
   Graph.Name = Graph.Shapes("Text Box 25").TextFrame.Characters.Text
   Next Graph
End Sub

Cela dit cette forme dessinée contient une formule qui renvoie vers une cellule de la feuille "c". Voir si le lien ne pourrait pas se faire par une autre voie quand même en partant de la 1ère série...
Cordialement.

 

[jeffe]

Re : nommer feuille graphique

bonjour dranreb, le forum.
encore une fois, mille merci pour cette aide, je savais pas que l'on pouvais utiliser le même n° de textbox appelant diferentes zones sur differentes feuilles .
Pour ta 2ème solution, pourquoi pas mais la c'est encore un mystère.
bon we