Graphique dynamique sur VBA

Bonjour,
Je suis en train de faire un projet sur VBA et je suis en train de faire un graphique qui dépend d'un tableau , le seul problème est que le tableau peut varier en nombre de lignes donc mon graphique doit s'adapter aux nombres de ligne.
J'ai essayé ce code mais ça ne marche pas, quelqu'un pourrait m'aider à apporter une amelioration au niveau de mon code.


Sub generation_graph()
Dim a As Byte
a = nbTitres

Dim graph As Chart
Set graph = Charts.Add
With graph
.SetSourceData Worksheets("feuil3").Range(Cells(bLigTab, bColTab + 2), Cells(bLigTab + a, bColTab + 3)), xlColumns
.ChartType = xlXYScatter
.HasTitle = True
.ChartTitle.Text = "Portfolio Set"
.Name = "graphique portfolio"
End With

End Sub

Ici mon tableau varie en fonction de nbTitres. bLigTab et bColTab sont les points de repére de mon tableau.Là ou ça bloque c'est au niveau de " .SetSource......"
Merci pour vos réponses.