Renommer un graphique

Pierrot93

XLDnaute Barbatruc

• 25 Novembre 2013

• #2

Re : Renommer un graphique

Bonjour,

essaye peut être ainsi :

Code:

Sheets("Feuil1").Shapes(1).Name = "NomGraph"

bon après midi
@+

 

Vote positif 0 Vote négatif

T

Troudz

XLDnaute Occasionnel

• 25 Novembre 2013

• #3

Re : Renommer un graphique

Bonjour Pierrot et merci pour ta réponse

Le soucis c'est que j'ai plusieurs graphiques sur chaque feuille. Comment puis je récupérer le numéro d'index de mon Shapes ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Novembre 2013

• #4

Re : Renommer un graphique

Re,

ou ceci du reste :

Code:

Sheets("Feuil1").ChartObjects(1).Name = "NomGraph"

 

Vote positif 0 Vote négatif

T

Troudz

XLDnaute Occasionnel

• 25 Novembre 2013

• #5

Re : Renommer un graphique

Nos messages semblent s'être croisés Pierrot.
Mon soucis est que ma macro se lance sur le graphique sélectionner par l'utilisateur. Du coup je ne connais pas son numéro d'index et ne peut le saisir "en dur" dans ma macro.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Novembre 2013

• #6

Re : Renommer un graphique

Re,

pourquoi ne pas utiliser une variable objet alors :

Code:

Dim c As Chart
Set c = ActiveChart

ensuite dans ton code, quand tu veux faire référence au graph tu te sert de la variable "c"....

 

Vote positif 0 Vote négatif

T

Troudz

XLDnaute Occasionnel

• 25 Novembre 2013

• #7

Re : Renommer un graphique

Tous simplement parce que je n'y avais pas pensé

Merci pour ton aide Pierrot.

Bonne fin de journée à tous !

 

Vote positif 0 Vote négatif