Bonjour,
Sur une feuille de calcul, j'ai une macro qui génère un grahique à partir d'une plage de cellules donnée.
Voici le code :
Cette macro est identique pour plusieurs feuilles de calcul. Seulement, avec ce code, tous les graphiques apparaissent sur la feuille 1. Or je voudrais que chaque graphique apparaissent sur sa propre feuille (sans avoir à multiplier la macro car le nombre de feuille de calcul peut varier).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 'Sélection de la plage du tableau pour le graphique Set SourceRange = Range([G4].Offset(0, 4), [G4].End(xlDown)) 'Ajout du tableau Charts.Add ActiveChart.ChartType = xl3DBarClustered ActiveChart.SetSourceData Source:=SourceRange, PlotBy:=xlColumns ActiveChart.Location Where:=xlLocationAsObject, Name:=Feuil1
J'ai essayé avec un truc du genre "ActiveSheets" dans la rubrique "Name:=" mais ça ne marche pas. Est-ce que qqn pourrait m'aider svp ?
Pour résumer, je voudrais générer un graphique sur la feuille qui est active lorsque je clique sur la macro.
Merci d'avance
NiKoS29
Partager