Bonjour,

J'ai aujourd'hui rencontré un problème à l'exécution de l'un de mes programmes alors qu'il fonctionnait très bien auparavant.

En fait, j'ajoute un graphique, puis je le renomme juste après en faisant cela :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Sheets("Compte_rendu").Shapes.AddChart.Select
            ActiveChart.ChartType = xlColumnStacked
            With ActiveChart
                    .Parent.Name = "graphique" & i
                    .HasTitle = True
                    .ChartTitle.Characters.Text = Mid(Sheets("Graphique_bilan_mois").Cells(1, i), 3)
            End With
Le problème survient sur le premier ActiveChart, on détécte une erreur du type '91'. En fait, le débugger drt qu'il n'y a aucun objet sélectionné... et je ne vois pas comment je pourrais le sélectionner "autrement".
Peut être qu'il est possible de lui donner un nom dès sa création mais je ne trouve pas comment. Si quelqu'un a une petite idée la dessus...

Baptiste.