Elargir sélection de données d'un graphique vba
Bonjour,
J'essaie de mettre en place une macro qui, lorsque j'ajouterai une ligne de données dans mon classeur, ajouterait également cette ligne dans la sélection de données de mon graphique.
Cependant il semblerait qu'il y ait un soucis dans le code et je ne comprend pas pourquoi.
Voici mon code :
Code:
1 2 3 4 5 6 7 8 9
| ActiveSheet.ChartObjects("Graphique 1").Activate
Range("A2").Select
Range(Selection, Selection.End(xlDown)).Select
A = Range("A1:D" & [D65536].End(xlDown).Row).Select
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range(A), PlotBy:=xlColumns |
La ligne qui semble poser problème est :
Code:
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range(A), PlotBy:=xlColumns
Je ne comprends pas où est l'erreur.
Merci par avance pour votre aide
Bonne journée