Bonjour!

Je tente de faire un macro qui crée un graphique utilisant des plages au choix de l'utilisateur. Mon idée est de "construire" le range en ajoutant les cellules une par une dans un enchainement de "If check_box=1 then". Après je passe le tout dans les sources du chart.

Cependant comme vous le constaterez, ma syntaxe est assurément erronée mais je ne trouve aucune ressource à ce sujet...

Merci de votre aide!

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
If zvz_box = 1 Then
    myNameRange = myNameRange + "G2"
    myValueRange = myValueRange + "J2"
End If
 
If zvt_box = 1 Then
    myNameRange = myNameRange + "G3"
    myValueRange = myValueRange + "J3"
End If
 
If zvp_box = 1 Then
    myNameRange = myNameRange + "G4"
    myValueRange = myValueRange + "J4"
End If
 
' Blablabla et ensuite déterminer le range du chart en passant la variable
 
myChart.Chart.SeriesCollection.NewSeries
myChart.Chart.SeriesCollection(1).XValues = Sheets("metadata").Range(myValueRange)
myChart.Chart.SeriesCollection(1).Values = Sheets("metadata").Range(myNameRange)
myChart.Chart.SeriesCollection(1).Name = Sheets("metadata").Range("H1")