Changer le titre de plusieurs graphiques en meme temps

Question

Est-il possible de changer le titre de plusieurs graphiques en meme temps? Je joins un example. Je veux remplacer Year 1 par Year 2- Pour le moment je change le titre de chaque graphique un a un car je ne trouve pas comment tous les changer en meme temps. Pourriez-vous m'aider ? Merci en avance pour votre aide. Cordialement Marina...

bemann · Answer

Avec une routine VBA on peu en effet ré affecter un nouveau titre à tous les graphiques de la feuille voir exemple ci-joint cordialement...

protostomien · Answer

Je suis à la recherche d'une macro relativement proche de celle que tu proposes à Marina, et c'est dans ce cadre que je me permet de te demande si tu saurais comment je dois modifier cette macro. Le but serait de changer la couleur de remplissage des "points" d'une courbe par une couleur donnée. Pour illustrer mon propos : à l'heure actuelle je dois sélectionner chaque série de donnée de chaque graphique, aller dans l'onglet "mise en forme", sélectionner "remplissage de la forme" et cliquer sur la couleur que je souhaite. Le fait est que j'ai plusieurs dizaine de graphique par feuille de calcul, et qu'à chaque feuille de calcul correspond une couleur unique de remplissage des points (les courbes elles peuvent avoir des couleurs variables). Je pense donc qu'une bonne partie de la macro est la bonne, mais je ne trouve pas comment indiquer "modifier la couleurs de remplissage des points de série de donnée par X" Aurais tu une idée ? Merci d'avance Sub graph() For Each Graphique In ActiveSheet.ChartObjects Graphique.Activate ActiveChart.ChartTitle.Text = Range("t1").Value Next Graphique Range("s1").Activate End Sub...