Données source graphique excel depuis VBA

Bonjour,

un problème pour definir les données source d'un graphique depuis VBA

- depuis la feuille pour les valeursX ceci marche ={1,5.2}

- mais je n'arrive pas a faire la meme chose depuis VBA

Private Sub CommandButton1_Click()
Dim x1 As Long, x2 As Long, y1 As Long, y2 As Long
x1 = 1: x2 = 2
y1 = 6: y2 = 9
  With ActiveSheet.ChartObjects(1).Chart
   .SeriesCollection(1).XValues = "={" & x1 & ";" & x2 & "}"
   .SeriesCollection(1).Values = "={" & y1 & ";" & y2 & "}"
  End With
End Sub

Private Sub CommandButton2_Click()
Dim x1 As Single, x2 As Single, y1 As Single, y2 As Single
x1 = 1.5: x2 = 2
y1 = 6: y2 = 9
  With ActiveSheet.ChartObjects(1).Chart
   .SeriesCollection(1).XValues = "={" & x1 & ";" & x2 & "}"
   .SeriesCollection(1).Values = "={" & y1 & ";" & y2 & "}"
  End With
End Sub

le bouton1 fonctionne, le bouton2 ne fonctionne pas (erreur 1004)
je dois mal m'y prendre, je suppose que c'est une sombre histoire de virgule ou de point decimal,

quelqu'un aurait il une idée

merci