Discussion :

[Ghost0000]

Bonjour à tous !

Je viens vers vous car j'ai un problème de synthaxe afin de mettre à jour mes graphiques Excel !

Je vous explique :
J'ai un code qui met à jour une multitude de graphiques.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
    d = "Stockage"
    e = "AP"
    f = "AR"
 
    g = e & "3" & ":" & f       ' ==> AP3:AR
    h = e & "3" & ":" & e      ' ==> AP3:AP
    i = f & "3" & ":" & f        ' ==> AR3:AR
 
ActiveChart.SetSourceData Source:=Sheets("BDD").Range(e & Var & ":" & e & lastline, f & Var & ":" & f & lastline), PlotBy:=xlColumns

Le souci c'est que mon graphique affiche 2 variables (Hauteur en cm et Poids) alors que j'aimerai qu'il m'en Affiche qu'une seule variable (le poids) !!

J'ai un Tableau de données , qui se compose de la façon suivante :
Date + Heure | Hauteur(cm) | Poids
AP | AQ | AR

Le souci provient certainement du range qui sélectionne la plage AP,AQ et AR, alors que j'aimerai dans la source qu'il me prenne uniquement AP et AR...

Je n'arrive pas à trouver ce souci de synthaxe ...

Merci d'avance de votre aide

GK

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With Worksheets("BDD")
    ActiveChart.SetSourceData Source:=Union(.Range("AP3:AP" & LastLine), .Range("AR3:AR" & LastLine)), PlotBy:=xlColumns
End With

[Ghost0000]

Parfait !!!

C'est fonctionnel :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With Worksheets("BDD")
        ActiveChart.SetSourceData Source:=Union(.Range(h & LastLine), .Range(i & LastLine)), PlotBy:=xlColumns
End With

Merci !!!

Vive Developpez !

GK