Chers amis,
J'ai un macro affecté à un bouton pour la génération automatique des graphiques à partir une sélection de plage.
Le code s'exécute, mais précédé par le message "erreur d'exécution 13".
Quelqu'un peut m'aider à déceler l'anomalie?
Merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlLine
    ActiveChart.SetSourceData Source:=Selection
    ActiveChart.SeriesCollection(1).XValues = "='Feuille 1'!$A$12:$A$35"
    ActiveChart.ChartTitle.Select
    ActiveChart.Axes(xlCategory).Select
    ActiveChart.Axes(xlValue).Select
    ActiveChart.ChartArea.Select
    Range("F12").Select