[VB6] création graphes Excel à 2 axes

**getea85** · 21/04/2006, 14h34

Bonjour,

J'ai un petit souci avec VB6 : dans mon application, je lance Excel pour y coller des données et créer des graphes "classiques". Jusque là, ça va.

Mais je voudrais créer un graphe à 2 axes d'ordonnées (types personnalisés dans Excel) : ça ne plante pas mais ça refuse de me créer mon double axe !

J'ai testé d'autres types de graphe personnalisés et ça marche. En fait, il n'y a que le graphe type double axe d'ordonnées qui refuse de se construire normalement.

Quelqu'un aurait des infos la dessus ?

**getea85** · 21/04/2006, 15h32

Pour relancer ce sujet, voici comment j'appelle la création de mon graphe :

Code :

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

1
2
ActiveChart.ApplyCustomType ChartType:=xlBuiltIn, TypeName:= _
        "Courbes à deux axes"

Un graphe se crée bien mais pas celui que j'attends

**getea85** · 23/04/2006, 17h27

Une petite remontée de message au cas où il y aurait un spécialiste graphe Excel

**SilkyRoad** · 23/04/2006, 17h46

bonsoir

ci joint un exemple qui fonctionne chez moi

c'est la ligne

Code :

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

ActiveChart.SeriesCollection(2).AxisGroup = 2

qui permet de définir l'axe ( en utilsant les données de la 2eme serie )

Code :

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

1
2
3
4
5
6
 
Charts.Add
ActiveChart.ApplyCustomType ChartType:=xlBuiltIn, TypeName:="Courbes à deux axes"
ActiveChart.SetSourceData Source:=Sheets("Feuil1").Range("A1:C10"), PlotBy:=xlColumns
ActiveChart.Location Where:=xlLocationAsObject, Name:="Feuil1"
ActiveChart.SeriesCollection(2).AxisGroup = 2