incorporer variables dans un graphique

[ben]

Bonjour le forum,

je cherche comment insérer des variables dans le code suivant qui permet de générer un graphique :

j'aimerai remplacer H34:J34 par ces variable qui représente un total :
Varrougetot, varjaunetot, varverttot je n'arrive pas à trouver la bonne syntaxe

Sheets("Summary").Select
Sheets.Add.Name = "graphique"
Charts.Add
ActiveChart.ChartType = xl3DPieExploded
ActiveChart.SetSourceData Source:=Sheets("Summary").Range("H1:J1,H34:J34"), _
PlotBy:=xlRows
ActiveChart.Location Where:=xlLocationAsObject, Name:="graphique"
With ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "Représentation graphique de la comparaison"
End With
ActiveChart.ApplyDataLabels Type:=xlDataLabelsShowValue, LegendKey:=False, _
HasLeaderLines:=True


merci pour votre aide