Macros pour export graphique (taille d'export en cm) et "centrer le titre d'1 axe" ?

[lulu49]

Bonjour à tous, je sèche sur deux points dans ma prog :

Le premier comment centrer le titre de l'axe des X??
.Axes(xlCategory, xlPrimary).HasTitle = True
.Axes(xlCategory, xlPrimary).AxisTitle.Text = "Distances cumulées en centimètres"

Le second pb : comment définir la taille de mon image en centimètres sur la macro suivante??
Sub exportPTravers()
'
Dim Graph As ChartObject
For Each Graph In Sheets("Validation profils en travers").ChartObjects
Graph.Chart.export ThisWorkbook.Path & "\" & Graph.Name & "_PT" & ".gif", "GIF"
Next Graph
'
End Sub


Ah si pendant que je vous tiens 🙂
Savez vous comment remplir le fond d'une légende en jaune et mettre la légende à droite de la zone de dessin des séries ?

Merci bien pour ces précisions pour lesquelle j'ai du mal à trouver la ressource...

A+ LULU🙂