Nom Graphique VBA Excell

wolf3470 -  
 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



2 réponses

Réponse 1 / 2
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
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" 

ChartObjects(1).Name = "GR1"  
ChartObjects("GR1").Select


RQ. tu peux attribuer un nom au graphique lors de sa creation

bonne suite
1
Réponse 2 / 2
Utilisateur anonyme
 
Bonjour,

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
1

Discussions similaires

"Nom de l'adresse" lors d'une inscription sur une site
ScarexStupid -
Rossignol -

9 réponses
Annuaire portable gratuit à partir d'un nom
dani26 -
Authority -

9 réponses
Nom d’adresse
X -
X -

2 réponses
Nom sonnerie appel par defaut
Oceeane99 -
KartMen59 -

1 réponse
Nom d'adresse
Marie -
brucine -

1 réponse