Nom d’un Graphique

Bonjour,

Ayant été confrnté à ce genre de problème, voici un petit bout de macro en
Vba Excel 2000 créant un graphique "perso" qui permet de créer et récupérer
un nom de graphique sur une feuille.
Si celà peut t'aider...? Bonne chance.

EspacePlage = Range("Ax:Ay")

Sheets("Graphique").Select
ActiveSheet.ChartObjects.Add(0, 39, 660, 377).Select
Application.CutCopyMode = False

ActiveChart.ChartWizard Source:=Sheets("Tableau Résultats"). _
Range(EspacePlage), Gallery:=xlXYScatter, Format:=2, _
PlotBy:=xlColumns, CategoryLabels:=0, SeriesLabels _
:=0, HasLegend:=0, Title:="", CategoryTitle:="", _
ValueTitle:="", ExtraTitle:=""

NomDuGraphique = ActiveChart.Name
NomDuGraphique = Right(NomDuGraphique, Len(NomDuGraphique) -
Len(NomDeLaFeuille) - 1)
Range("A1") = NomDuGraphique


"Jean-Paul V" <JeanPaulV@discussions.microsoft.com> a écrit dans le message
de news:61B4DFA1-B1ED-4444-8E3C-F078E20816C3@microsoft.com...

Bonjour à tous
Je tourne en rond pour trouver où on modifie le nom d'un graphique.Si on a
sur une feuille plusieurs graphiques il faut pourtant bien les distinguer
pour les manipuler en tant qu'objet dans des macros.
J'ai pu voir que l'on peut voir le nom apparemment en faisant un clic
droit

sur le graphique et en faisant ''Fenêtre''

à+

Bonjour Joel

Pourrais-tu me donner un peu plus d'explication .
Comment fait on marcher cette macro dans une feuille où j'ai déjà 5
graphiques que dois je faire avant de la lancer?

à+

Bonjour,

Ayant été confrnté à ce genre de problème, voici un petit bout de macro en
Vba Excel 2000 créant un graphique "perso" qui permet de créer et récupérer
un nom de graphique sur une feuille.
Si celà peut t'aider...? Bonne chance.

EspacePlage = Range("Ax:Ay")

Sheets("Graphique").Select
ActiveSheet.ChartObjects.Add(0, 39, 660, 377).Select
Application.CutCopyMode = False

ActiveChart.ChartWizard Source:=Sheets("Tableau Résultats"). _
Range(EspacePlage), Gallery:=xlXYScatter, Format:=2, _
PlotBy:=xlColumns, CategoryLabels:=0, SeriesLabels _
:=0, HasLegend:=0, Title:="", CategoryTitle:="", _
ValueTitle:="", ExtraTitle:=""

NomDuGraphique = ActiveChart.Name
NomDuGraphique = Right(NomDuGraphique, Len(NomDuGraphique) -
Len(NomDeLaFeuille) - 1)
Range("A1") = NomDuGraphique


"Jean-Paul V" <JeanPaulV@discussions.microsoft.com> a écrit dans le message
de news:61B4DFA1-B1ED-4444-8E3C-F078E20816C3@microsoft.com...

Bonjour à tous
Je tourne en rond pour trouver où on modifie le nom d'un graphique.Si on a
sur une feuille plusieurs graphiques il faut pourtant bien les distinguer
pour les manipuler en tant qu'objet dans des macros.
J'ai pu voir que l'on peut voir le nom apparemment en faisant un clic
droit

sur le graphique et en faisant ''Fenêtre''

à+

Bonjour,
sélectionnes le graphique
clic droit de la souris -->fenêtre graphique
et là tu trouves le repérage du graphique dans le bandeau

ensuite, il suffit d'utiliser dans la macro ce nom.
A+

"Jean-Paul V" <JeanPaulV@discussions.microsoft.com> a écrit dans le message
de news: 61B4DFA1-B1ED-4444-8E3C-F078E20816C3@microsoft.com...

Bonjour à tous
Je tourne en rond pour trouver où on modifie le nom d'un graphique.Si on a
sur une feuille plusieurs graphiques il faut pourtant bien les distinguer
pour les manipuler en tant qu'objet dans des macros.
J'ai pu voir que l'on peut voir le nom apparemment en faisant un clic
droit
sur le graphique et en faisant ''Fenêtre''

à+

Bonjour à tous
Je tourne en rond pour trouver où on modifie le nom d’un graphique.Si on a
sur une feuille plusieurs graphiques il faut pourtant bien les distinguer
pour les manipuler en tant qu’objet dans des macros.
J’ai pu voir que l’on peut voir le nom apparemment en faisant un clic droit
sur le graphique et en faisant ‘’Fenêtre’’

Bonsoir,

Comme d'habitude, il suffisait de chercher chez Misange
http://www.excelabo.net/xl/graph.php#nomgraphique

--
François L