VBA - Variable en source de graphique

Question

Bonjour à tous, 

J'essaye de construire un graphique camembert dont la source s'adapte en fonction de l'année.
Ex: en 2016 on va chercher D4 à E14, 2017 D19 à E29...
Je n'arrive pas à ajouter une variable à la place de la source, voici le code initial:

Dim z As Integer, ligne As Integer, colonne As Integer
z = 2016
ligne = 5
colonne = 4
Range(Cells(ligne - 1, colonne), Cells(ligne + 9, colonne + 1)).Select
ActiveSheet.Shapes.AddChart2(251, xlPie).Select
'ligne qui pose problème
ActiveChart.SetSourceData Source:=Range("'Top 10 clients B2B'!$D$4:$E$14")


A la place de Range("'Top 10 clients B2B'!$D$4:$E$14") j'aimerai pouvoir mettre mes variables ligne et colonne

J'ai essayé de passer par un range mais je n'ai pas réussi,

Merci à vous

Configuration: Windows / Chrome 102.0.0.0

via55 · Answer

Bonjour

Quelque chose comme cela ?
    x1 = 4
    x2 = 14
    y1 = D
    y2 = E

ActiveChart.SetSourceData Source:=Range("'Top 10 clients B2B'!" & y1 & x1 & ":" & y2 & x2)
Cdlmnt
Via

VBA - Variable en source de graphique

1 réponse

Votre réponse

Discussions similaires