[WD15] Excel graphe Ole automation

Excel graphe Ole automation

Bonjour,
je dois créer des graphiques dans excel depuis windev
j'utilise des objets OLe dynamiques et cela fonctionne correctement.
Par contre je n'arrive pas à mettre des étiquettes et les pourcentages sur le graphique de type camembert.
J'utilise la syntaxe suivante (code pris d'une macro VBA sous Excel) mais elle ne fonctionne pas

Code:

:m_pautExcel>>ActiveChart>>SeriesCollection(1)>>DataLabels>>ShowPercentage = True

ou

Code:

/ActiveChart>>SeriesCollection(1)>>DataLabels>>ShowCategoryName= True

:m_pautExcel étant

qui peut m'aider svp ?
merci d'avance

bonjour,

il faut utiliser apparemment la méthode ApplyDataLabels pour que cela fonctionne

par exemple :
Code:

1 2 3 4 5 :m_pautExcel>>ActiveSheet>>ChartObjects(1)>>Activate() :m_pautExcel>>ActiveChart>>SeriesCollection(1)>>ApplyDataLabels() :m_pautExcel>>ActiveChart>>SeriesCollection(1)>>DataLabels>>ShowPercentage = Vrai :m_pautExcel>>ActiveChart>>SeriesCollection(1)>>DataLabels>>ShowCategoryName = Vrai
ou alors n'utiliser que la méthode ApplyDataLabels en lui appliquant tous les paramètres (voir sur msdn VBA Excel ApplyDataLabels)
Code:

1 2 // expression.ApplyDataLabels(Type, LegendKey, AutoText, HasLeaderLines, ShowSeriesName, // ShowCategoryName, ShowValue, ShowPercentage, ShowBubbleSize, Separator)
on ne peut pas passer que quelques paramètres (sauf si c'est les premiers) en OLE AUTOMATION windev comme on pourrait le faire en VBA

Ami calmant, J.P ;)

Ole automation type de graphique Excel

Bonjour,je créé des graphes dans Excel depuis windev par ole automation.

Pour choisir le type de graphe j'utilise lde code

:m_pautExcel>>ActiveChart>>ChartType = 51 (Histogramme)

par contre je ne trouve pas les codes des autres types de graphiques dans Excel
(xl3DPie par exemple secteurs avec effet 3D .. + les autres types )

Merci d'avance

bonjour,
voici les valeurs des constantes pour les graphiques :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
 
// XlChartType  
 var xl3DArea = -4098;
 var xl3DAreaStacked = 78;
 var xl3DAreaStacked100 = 79;
 var xl3DBarClustered = 60;
 var xl3DBarStacked = 61;
 var xl3DBarStacked100 = 62;
 var xl3DColumn = -4100;
 var xl3DColumnClustered = 54;
 var xl3DColumnStacked = 55;
 var xl3DColumnStacked100 = 56;
 var xl3DLine = -4101;
 var xl3DPie = -4102;
 var xl3DPieExploded = 70;
 var xlArea = 1;
 var xlAreaStacked = 76;
 var xlAreaStacked100 = 77;
 var xlBarClustered = 57;
 var xlBarOfPie = 71;
 var xlBarStacked = 58;
 var xlBarStacked100 = 59;
 var xlBubble = 15;
 var xlBubble3DEffect = 87;
 var xlColumnClustered = 51;
 var xlColumnStacked = 52;
 var xlColumnStacked100 = 53;
 var xlConeBarClustered = 102;
 var xlConeBarStacked = 103;
 var xlConeBarStacked100 = 104;
 var xlConeCol = 105;
 var xlConeColClustered = 99;
 var xlConeColStacked = 100;
 var xlConeColStacked100 = 101;
 var xlCylinderBarClustered = 95;
 var xlCylinderBarStacked = 96;
 var xlCylinderBarStacked100 = 97;
 var xlCylinderCol = 98;
 var xlCylinderColClustered = 92;
 var xlCylinderColStacked = 93;
 var xlCylinderColStacked100 = 94;
 var xlDoughnut = -4120;
 var xlDoughnutExploded = 80;
 var xlLine = 4;
 var xlLineMarkers = 65;
 var xlLineMarkersStacked = 66;
 var xlLineMarkersStacked100 = 67;
 var xlLineStacked = 63;
 var xlLineStacked100 = 64;
 var xlPie = 5;
 var xlPieExploded = 69;
 var xlPieOfPie = 68;
 var xlPyramidBarClustered = 109;
 var xlPyramidBarStacked = 110;
 var xlPyramidBarStacked100 = 111;
 var xlPyramidCol = 112;
 var xlPyramidColClustered = 106;
 var xlPyramidColStacked = 107;
 var xlPyramidColStacked100 = 108;
 var xlRadar = -4151;
 var xlRadarFilled = 82;
 var xlRadarMarkers = 81;
 var xlStockHLC = 88;
 var xlStockOHLC = 89;
 var xlStockVHLC = 90;
 var xlStockVOHLC = 91;
 var xlSurface = 83;
 var xlSurfaceTopView = 85;
 var xlSurfaceTopViewWireframe = 86;
 var xlSurfaceWireframe = 84;
 var xlXYScatter = -4169;
 var xlXYScatterLines = 74;
 var xlXYScatterLinesNoMarkers = 75;
 var xlXYScatterSmooth = 72;
 var xlXYScatterSmoothNoMarkers = 73;

et voici la traduction :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
 
Histogramme Histogramme groupé xlColumnClustered
Histogramme 3D groupé xl3DColumnClustered
Histogramme empilé xlColumnStacked
Histogramme 3D empilé xl3DColumnStacked
Histogramme empilé 100 % xlColumnStacked100
Histogramme 3D empilé 100 % xl3DColumnStacked100
Histogramme 3D xl3DColumn
Barres Barres groupées xlBarClustered
Barres 3D groupées xl3DBarClustered
Barre empilée xlBarStacked
Barre 3D empilée xl3DBarStacked
Barre empilée 100 % xlBarStacked100
Barre 3D empilée 100 % xl3DBarStacked100
Courbe Courbe xlLine
Courbe avec marqueurs xlLineMarkers
Courbe empilée xlLineStacked
Courbe empilée avec marqueurs xlLineMarkersStacked
Courbe empilée 100 % xlLineStacked100
Courbe empilée 100 % avec marqueurs xlLIneMarkersStacked100
Courbe 3D xl3DLine
Secteur Secteur xlPie
Secteur éclaté xlPieExploded
Secteur 3D xl3Dpie
Secteur 3D éclaté xl3DPieExploded
Secteur de secteur xlPieOfPie
Barre de secteur xlBarOfPie
XY (nuage de points) Nuage de points xlXYScatter
Nuage de points avec lissage xlXYScatterSmooth
Nuage de points avec lissage et sans marqueurs de données xlXYScatterSmoothNoMarkers
Nuage de points et courbes xlXYScatterLines
Nuages de points et courbes sans marqueurs de données xlXYScatterLinesNoMarkers
Bulles Bulle xlBubble
Bulle avec effet 3D xlBubble3DEffect
Aires Aire xlArea
Aire 3D xl3DArea
Aire empilée xlAreaStacked
Aire 3D empilée xl3DAreaStacked
Aire empilée 100 % xlAreaStacked100
Aire 3D empilée 100 % xl3DAreaStacked100
Anneau Anneau xlDoughnut
Anneau éclaté xlDoughnutExploded
Radar Radar xlRadar
Radar avec marqueurs de données xlRadarMarkers
Radar plein xlRadarFilled
Surface Surface 3D xlSurface
Surface (vue de dessus) xlSurfaceTopView
Surface 3D (structure) xlSurfaceWireframe
Surface (structure vue de dessus) xlSurfaceTopViewWireframe
Boursier Boursier (max/min/clôture) xlStockHLC
Boursier (vol/max/min/clôture) xlStockVHLC
Boursier (ouverture/max/min/clôture) xlStockOHLC
Boursier (vol/ouverture/max/min/clôture) xlStockVOHLC
Cylindre Histogramme cylindrique groupé xlCylinderColClustered
Barre cylindrique groupée xlCylinderBarClustered
Histogramme cylindrique empilé xlCylinderColStacked
Barre cylindrique empilée xlCylinderBarStacked
Histogramme cylindrique empilé 100 % xlCylinderColStacked100
Barre cylindrique empilée 100 % xlCylinderBarStacked100
Histogramme cylindrique 3D xlCylinderCol
Cône Histogramme conique groupé xlConeColClustered
Barre conique groupée xlConeBarClustered
Histogramme conique empilé xlConeColStacked
Barre conique empilée xlConeBarStacked
Histogramme conique empilé 100 % xlConeColStacked100
Barre conique empilée 100 % xlConeBarStacked100
Histogramme conique 3D xlConeCol
Pyramide Histogramme pyramidal groupé xlPyramidColClustered
Barre pyramidale groupée xlPyramidBarClustered
Histogramme pyramidal empilé xlPyramidColStacked
Barre pyramidale empilée xlPyramidBarStacked
Histogramme pyramidal empilé 100 % xlPyramidColStacked100
Barre pyramidale empilée 100 % xlPyramidBarStacked100
Histogramme pyramidal 3D xlPyramidCol

Ami calmant, J.P ;)