Discussion :

[alex en droit]

Bonjour à tous,

dans un onglet Graph, j'ai un graphique.
Je voudrais mettre une case à cocher pour activer ou désactiver les étiquettes de valeurs, mais je ne parviens pas à voir le nom de cette case (du type CheckBox1 dans un Userform) - A la place, j'ai "Case à cocher 1" qui s'affiche dans la zone des noms et VBA lève une erreur sur le nom (puisqu'il y a des espaces !!)

Avez-vous déjà réalisé une graph avec celà ?

Merci
Alex

[ESVBA]

Je ne connais pas le code utilisé mais en général il faut encadrer par des " ou des '

Sinon :
1)Se placer sur l'onglet graphique (le graphe), insérer la case à cocher depuis l'onglet Développeur | Insérer | Case à cocher de formulaire.

2)Renomme-là si besoin par un clic droit dans le texte de la case à cocher | Modifier le texte. Il n'a pas d'importance pour le reste de l'opération.

3)Place ce code dans un module

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub AffecteAffectePasEtiquettes()
    'Ici on fait référence à l'index de la case à cocher, pas à son nom
    'Attention s'il y a plusieurs cases à cocher sur le graphique
    If ActiveChart.CheckBoxes(1).Value = 1 Then
        ActiveChart.SetElement (msoElementDataLabelShow)
    Else
        ActiveChart.SetElement (msoElementDataLabelNone)
    End If
End Sub

4) Par un clic droit sur la case à cocher, sélectionne "Affecter une macro...". Choisir "AffecteAffectePasEtiquettes". Faire Ok
5) Enregistrer le fichier.


ESVBA