Modification dimension marqueur dans plusieurs graphique

[raf2022]

Bonjour,

J'ai un fichier excel avec 15 feuilles.
Chaque feuille à un graphique à nuage de points.
Chaque graphique est composé de 30 courbes à nuage de points.

Je cherche à modifier la taille des marqueurs de mes points pour toutes les courbes et tous les graphiques.
Actuelment je n'ai pas trouvé mieux que de changer coube après courbe et comme j'en ai 15*30 c'est long.

Qui connait une méthode pour changer toues les dimensions de mes marqueurs en une seul fois.

Merci

Raf

 

[Caillou]

Re : Modification dimension marqueur dans plusieurs graphique

Bonjour,

Avec une petite macro.
Attention ce code traite tous les graphiques de toutes les feuilles de calucl du classeur sans distinction ! (faire une copie avant !!!)

Sub Macro1()
  Dim F As Worksheet
  Dim G As ChartObject
  Dim S As Series
  For Each F In ActiveWorkbook.Sheets
    For Each G In F.ChartObjects
      G.Select
      
      For Each S In G.Chart.SeriesCollection
        S.MarkerSize = 2
      Next
    Next
  Next
End Sub

Ce code est à copier sur un module standard.
La taille du marqueur est indiqué par le 2 de la ligne S.MarkerSize = 2
Caillou

 

[raf2022]

Re : Modification dimension marqueur dans plusieurs graphique

Bonjour Caillou,

La macro fonctionne à merveille et tout est ok.
Je vais pouvoir partir en week-end avec de l'avance !

Un grand merci.


Raf

 

[meleto]

Re : Modification dimension marqueur dans plusieurs graphique

Excellent Caillou ! Merci beaucoup !