J'écris un programme qui crée des graphes, le programme bloque avec ce cas je ne comprends pas pourquoi car j'ai presque fait copier coller des autres cas.
La méthode 'SetElement' de l'objet '_Chart' a échoué ....
Voyez vous quelque chose ?
ActiveSheet.Shapes.AddChart2(332, xlLineMarkers).Select
ActiveChart.SetSourceData Source:=Range("J2:P2,J7:P7")
With ActiveChart.Parent
.Top = Range("J75").Top
.Left = Range("J75").Left
End With
ActiveChart.HasTitle = True
ActiveChart.ChartTitle.Text = "Proportion du Money IN en fonction de l'âge des clients (MIPISE), nb clients = " & Sheets("listes âge et modèles").Range("T8").Value
ActiveChart.SetElement (msoElementDataLabelOutSideEnd)
Merci