michelde
Messages postés27Date d'inscriptionlundi 22 mars 2004StatutMembreDernière intervention16 octobre 2010
-
11 oct. 2010 à 15:38
bigfish_le vrai
Messages postés1835Date d'inscriptionvendredi 13 mai 2005StatutMembreDernière intervention20 novembre 2013
-
11 oct. 2010 à 16:27
bonjour
Voici une macro qui permet de changer un graphique barres verticales en barres horizontales
Sub ChangerType()
ActiveSheet.ChartObjects("Graphique 1").Activate
If ActiveChart.ChartType = xlBarClustered Then
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.SeriesCollection(1).Select
ActiveChart.ChartType = xlColumnClustered
Else
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.SeriesCollection(1).Select
ActiveChart.ChartType = xlBarClustered
End If
End Sub
Je souhaiterais changer de barres verticales en courbes , anneaux, secteurs
Bref je souhaiterais avoir une macro qui me permette de modifier mon graphique actuel en autres graphiques
Avec une liste de choix
Est-ce possible
Merci
michel