IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

WinDev Discussion :

Excel graphe Ole automation


Sujet :

WinDev

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Avril 2010
    Messages
    34
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2010
    Messages : 34
    Par défaut 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 : Sélectionner tout - Visualiser dans une fenêtre à part
    :m_pautExcel>>ActiveChart>>SeriesCollection(1)>>DataLabels>>ShowPercentage = True
    ou
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    /ActiveChart>>SeriesCollection(1)>>DataLabels>>ShowCategoryName= True
    :m_pautExcel étant

    qui peut m'aider svp ?
    merci d'avance

  2. #2
    Expert confirmé
    Avatar de jurassic pork
    Homme Profil pro
    Bidouilleur
    Inscrit en
    Décembre 2008
    Messages
    4 247
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Bidouilleur
    Secteur : Industrie

    Informations forums :
    Inscription : Décembre 2008
    Messages : 4 247
    Par défaut
    bonjour,

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

    par exemple :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Avril 2010
    Messages
    34
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2010
    Messages : 34
    Par défaut 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

  4. #4
    Expert confirmé
    Avatar de jurassic pork
    Homme Profil pro
    Bidouilleur
    Inscrit en
    Décembre 2008
    Messages
    4 247
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Bidouilleur
    Secteur : Industrie

    Informations forums :
    Inscription : Décembre 2008
    Messages : 4 247
    Par défaut
    bonjour,
    voici les valeurs des constantes pour les graphiques :
    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
    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 : 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
    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

Discussions similaires

  1. [WD12] copier une feuille excel en ole automation
    Par Ratafia67 dans le forum WinDev
    Réponses: 5
    Dernier message: 16/04/2010, 08h54
  2. [WD12] exécuter une macro excel avec ole automation
    Par Ratafia67 dans le forum WinDev
    Réponses: 2
    Dernier message: 15/04/2010, 07h57
  3. OLE Automation Excel - insertion d'une image
    Par Silvia12 dans le forum WinDev
    Réponses: 1
    Dernier message: 19/03/2008, 08h32
  4. Manipuler Excel via Ole automation
    Par falcon dans le forum Excel
    Réponses: 3
    Dernier message: 02/10/2007, 15h39
  5. OLE automation pour Excel
    Par escteban dans le forum VBScript
    Réponses: 5
    Dernier message: 19/04/2007, 12h20

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo