Bonjour à tous!

C'est la toute première fois que je code en VBA et voilà maintenant 2 jours que je m'arrahce les cheveux sur un problème :
Je souhaiterais créer un graphique nuage de point à partir d'un tableu de donnés qui peux varier

Lorsque je crée mon graphique les données des abcisses sont choisi par défaut par excel alors que je souhaiterais définir une de mes colonnes (dans mon cas la première colonne) comme données des abcisses.

Voici mon code pour le moment :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sub Macro()
Range("b1", Range("b1").End(xlDown).End(xlToRight)).Select
 ActiveSheet.Shapes.AddChart.Select
 ActiveChart.ChartType = xlXYScatterSmoothNoMarkers
 ActiveChart.Location Where:=xlLocationAsNewSheet
End Sub
Merci d'avance pour votre aide !