VBA - Création d'une graphique dynamique à partir de la colonne d'une cellule sélectionnée

Bonjour !

Je me permets de vous poser une petite question de programmation VBA que je n'arrive pas à résoudre.

J'ai tenté de créer une macro me permettant de générer, à partir d'un tableau à deux entrées, un graphique linéaire changeant selon la cellule sélectionnée. Concrètement, si je sélectionne n'importe quelle cellule sur le plage B22:N22, j'aimerais que les données de la plage utilisées pour générer mon graphique linéaire soient celles figurant sur la plage C22:N22.

J'ai pour l'instant écrit ces lignes de code qui ne fonctionnent pas, et je pense que cela vient de la méthode de sélection des données à partir de la cellule active.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Worksheet_SelectionChange()   Dim MyChart As Chart Dim DataRange As Range   Set DataRange = ActiveCell.Row Set MyChart = Sheets("Chart 1").Shapes.AddChart.Chart MyChart.SetSourceData Source:=DataRange MyChart.ChartType = xlXYScatterLines   End Sub

---

J'espère que quelqu'un sera en mesure de m'aider, merci d'avance !

ActiveCell.Row donne pour résultat le n° de la ligne (row) où se trouve la cellule active. Ce n'est donc absolument pas une "plage" (range).
Il faudrait donc compléter avec qq chose de ce genre

Code:

---

1 2 3 4

Dim kR As Long, kC As Long kR = ActiveCell.Row kC = ActiveCell.Column Set DataRange = Range(Cells(kR, kC + 1), Cells(kR, 14)) '--- 14 = colonne N

---

Bonne continuation