Bonjour à tous !
Je cherche à changer le type de graphique selon un modèle défini d'une centaine de graphiques. je voulais savoir s'il était possible de faire une boucle a partir de ce modèle pour que cela me change tous les graphiques d'un coup.
Sub ChangementGraphique()
For i = 1 To 80
ActiveSheet.ChartObjects("Graphique i").Activate
ActiveChart.PlotArea.Select
ActiveChart.ApplyChartTemplate ( _
"C:\Users\fr101812\AppData\Roaming\Microsoft\Templates\Charts\Graphique etiquetes penchées.crtx" _
)
Next
End Sub
j'ai vu la solution de la boucle "For" mais cela ne fonctionne pas. Est ce que quelqu'un aurait une solution ?
Joyeuse fêtes à tous et bonne soirée !