graphique dynamique colonnes

T

tudobeo

Guest

• 8 Mars 2011

• #2

Re : graphique dynamique colonnes

Un petit up pour pour pas tomber aux oubliettes ? 😕

et j'en profite pour une petite précision, je suis preneur de solutions avec et sans vba.

Merci

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Mars 2011

• #3

Re : graphique dynamique colonnes

Bonjour,

regarde le lien ci-dessous, tu devrais y trouver ta réponse :
Champ dynamique

bon après midi
@+

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 8 Mars 2011

• #4

Re : graphique dynamique colonnes

Bonjour,

Hello Pierrot🙂

@tudobeo:
Comme la définition du graphique est trop complexe pour excel pour renvoyer et les données et les légendes, dans le fichier joint j'ai utilisé à la fois les formules nommées ('Etiquettes','GraphDatas') et vba pour la mise à jour.

A+

 

Vote positif 0 Vote négatif

T

tudobeo

Guest

• 9 Mars 2011

• #5

Re : graphique dynamique colonnes

Merci beaucoup Hasco!

C'est bien ça que je cherchais à faire.

Par contre, la macro s'effectue avec une erreur et je pense que c'est ça qui fait que les etiquettes apparaissent sous la forme "serie 1", "serie 2"... et pas les années.

Par contre, étant une quiche en vba, ben je sais pas pourquoi ça bugue!

A+

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 9 Mars 2011

• #6

Re : graphique dynamique colonnes

Bonjour,

VB:

Sub MiseAjourGraph()
    Dim oGraph As Chart
    Dim i As Integer
    If Sheets("BDD").ChartObjects.Count = 0 Then Exit Sub
    With Sheets("BDD").ChartObjects(1).Chart
        .SetSourceData Source:=Union(Sheets("BDD").Range("Etiquettes"), Sheets("BDD").Range("GraphDatas")), PlotBy:=xlColumns
        For i = 1 To .SeriesCollection.Count
             .SeriesCollection(i).Name = Sheets("BDD").Range("GraphDatas")(0, i).Text
        Next
    End With
End Sub

A+

 

Vote positif 0 Vote négatif