bonjour à tous,

Je viens à vous aujourd'hui avec un petit soucis que je n'arrive pas à résoudre..

Je créer des graphique à 3dimensions à partir de matrice d'un fichier texte.
toutes la conversion et création des graphiques c'est ok.

Je n'arrive juste pas à ajouter de titre pour l'axe Z... (aucun soucis pour X, Y et titre du graphique)

si quelqu'un a la solution , j'ai essayé pas mal de chose mais en vain.....


voici mon bout de code :

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
 
With chartPage
                            .ApplyLayout(3) 
                            .ChartStyle = 34
                            .ClearToMatchStyle()
 
                            .HasTitle = True
                            .ChartTitle.Characters.Text = nouveau_histo_2D.nom_histo
 
 
                            .SetSourceData(Source:=chartRange)
                            .ChartType = Excel.XlChartType.xl3DColumn
 
 
                            'AXE X
                            .Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary).HasTitle = True
                            .Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary).AxisTitle.Characters.Text = Mid(oBook.sheets(nouveau_histo_2D.nom_histo).cells(1.1).text, 1, InStr(oBook.sheets(nouveau_histo_2D.nom_histo).cells(1.1).text, ") /"))
 
                            'AXE Y
                            .Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary).HasTitle = True
                            .Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary).AxisTitle.Characters.Text = "Count or %"
 
                            'AXE Z
                            '?????
                            '?????
 
                            .Location(Excel.XlChartLocation.xlLocationAsNewSheet).Name = "graph " & nouveau_histo_2D.nom_histo
 
                        End With