Nom Graphique VBA Excell
wolf3470
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
Pour un projet je dois coder en VBA un graphique en cliquant sur un bouton prédéfini.
Au niveau du code tout va bien le graphique prend les bonnes données.
Maintenant je veux l'agrémenter en mettant un titre de graphique et aux axes.
Mon problème vient du fait que je ne peux créer correctement ce graphique qu'une seule fois en appuyant sur ce bouton puisque dans mon code je vais chercher le graphique 1
ActiveSheet.ChartObjects("Graphique 1").Activate
Du coup si je refait l'opération une deuxième fois je ne peux plus modifier les titres puisque je n'active pas le bon graphique.
D'où ma question.
Comment imposer un numéro ou un nom à mon graphique lors de sa création pour que la mise en page du graph soit la bonne en utilisant plusieurs fois ce bouton.
D'avance Merci.
Fabien
Pour un projet je dois coder en VBA un graphique en cliquant sur un bouton prédéfini.
Au niveau du code tout va bien le graphique prend les bonnes données.
Maintenant je veux l'agrémenter en mettant un titre de graphique et aux axes.
Mon problème vient du fait que je ne peux créer correctement ce graphique qu'une seule fois en appuyant sur ce bouton puisque dans mon code je vais chercher le graphique 1
ActiveSheet.ChartObjects("Graphique 1").Activate
Du coup si je refait l'opération une deuxième fois je ne peux plus modifier les titres puisque je n'active pas le bon graphique.
D'où ma question.
Comment imposer un numéro ou un nom à mon graphique lors de sa création pour que la mise en page du graph soit la bonne en utilisant plusieurs fois ce bouton.
D'avance Merci.
Fabien
A voir également:
- Nom Graphique VBA Excell
- Changer carte graphique - Guide
- Graphique camembert excel - Guide
- Comment faire un graphique sur excel - Guide
- Graphique sparkline - Guide
- Carte graphique oc - Forum Carte graphique
2 réponses
bonjour
chaque objet graphique peut etre defini par son rang dans la collection des objets ou par un nom en dur
pour attribuer un nom au graphique n°1
puis pour selectionner le graphique de nom "GR1"
RQ. tu peux attribuer un nom au graphique lors de sa creation
bonne suite
chaque objet graphique peut etre defini par son rang dans la collection des objets ou par un nom en dur
pour attribuer un nom au graphique n°1
puis pour selectionner le graphique de nom "GR1"
ChartObjects(1).Name = "GR1"
ChartObjects("GR1").Select
RQ. tu peux attribuer un nom au graphique lors de sa creation
bonne suite
Bonjour,
En complément de ccm81, tu peux avec ce code parcourir
la liste des graphiques sur une même feuille.
Cdt
Lupin
En complément de ccm81, tu peux avec ce code parcourir
la liste des graphiques sur une même feuille.
Sub Parcour_Graphiques()
Dim NomGraphique As String
Dim objGraph As ChartObject
Dim Texte As String
Texte = ""
For Each objGraph In ActiveSheet.ChartObjects
If (objGraph.Name = "Graphique 1") Then
DoEvents
'... Code pour la manipulation
End If
Texte = Texte & vbCrLf & objGraph.Name
Next objGraph
MsgBox Texte
End Sub
'
Cdt
Lupin
