Graphique: Modifier le type de marque d'une série en VBA

  • Initiateur de la discussion Initiateur de la discussion MJ13
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

MJ13

XLDnaute Barbatruc
Bonjour à tous

Hier, grâce à james que je salue, j'ai pu colorier une série d'un graphique sur XL2007 avec:

Code:
Sub change_couleur_serie_XL2007()
With ActiveChart.SeriesCollection(1)
.Border.Color = RGB(255, 0, 0)
End With
With ActiveChart.SeriesCollection(1)
.Interior.Color = RGB(255, 0, 0)
End With
End Sub

Mais la, je m'arrache les cheveux dans l'aide et sur les Web pour trouver comment modifier le type de marque d'une série si l'on veut: par exemple pour changer de rond à carré.

Merci pour vos lumières 🙂.

PS: Si je ne peux pas répondre de suite, je répondrai ce soir 😉.
 
Re : Graphique: Modifier le type de marque d'une série en VBA

Re

Bon finalement, je pensais que sur XL2007, on ne pouvait rien enregistrer avec Henry 😉 sur les graphiques.

Mais après un test sans conviction, j'ai pu faire ce code:

Code:
Sub Change_Marque_test()
    ActiveSheet.ChartObjects("Graphique 1").Activate
    With ActiveChart.SeriesCollection(1)
    For i = 1 To 9
    Stop
    .MarkerStyle = i
    '.MarkerSize = 7
    '.Border.LineStyle = xlDash
    ' .Format.Line.DashStyle = msoLineSysDot
    Next
    End With
End Sub

Voir aussi cette discussion très intéressante 🙂.

https://www.excel-downloads.com/threads/style-de-trait-dans-graphique.156164/
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
0
Affichages
459
Réponses
2
Affichages
1 K
Réponses
8
Affichages
1 K
Retour