[VBA] Réalisation de graphiques avec séries multiples

[Kephset]

Bonjour à tous ceux qui comme moi ne sont pas en vacances,

Voilà mon problème, j'ai créé un tableau en récupérant les données à partir d'autres classeurs. A partir de ce tableau, je veux créer un simple nuage de points. Mon tableau est de la forme : Libellé1, Var A, Var B.

Je veux que le graphique affiche un point en (Var A, Var B) et que dans la légende, j'ai la légende du point avec le Libellé1.

Pour essayer ceci, voici mon code (je précise que je débute dans ce domaine ;-D)

Set objChart = ThisWorkbook.Charts.Add
objChart.ChartType = xlXYScatter
For i = 3 To countvar + 2
objChart.SeriesCollection.Add feuilBilan.Range("A" & i, "C" & i), xlRows, True
Next

Le nombre d'individus étant variable, j'utilise une boucle pour ainsi créer ce graphique. Le problème de ce graphique est que j'ai au final 2 points par série. Une en X=1 et l'autre en X=2. Avec en X=1 le Y de ma Var A et en X=2, ceux de ma Var B, alors que je veux le croisement des deux.

Si ça peut aider voici la formule d'un point que j'aimerais obtenir :
=SERIE(Tableaux!$A$4;Tableaux!$B$4;Tableaux!$C$4;2)
Et pour l'instant j'ai ceci :
=SERIE(Tableaux!$A$4;;Tableaux!$B$4:$C$4;2)


Merci d'avance pour votre aide
Kephset