graphique

[Isabelle]

Bonjour ou plutôt bonne nuit, existe t-il un moyen de dimensionner un graphique sans utiliser:

ActiveSheet.Shapes(1).ScaleHeight 1.37, msoFalse, _
msoScaleFromBottomRight
ActiveSheet.Shapes(1).ScaleWidth 1.42, msoFalse, _
msoScaleFromBottomRight

De quelle façon le graphique peut avoir une dimension fixe en mm?
Je suis allée sur le site disciplus mais ça m'a pas aidée.Je n'arrive pas à écrire la bonne syntaxe.

Si vous avez des exemples, ou autres ,ils sont bienvenus.

 

[Isabelle]

J'ai eu ma réponse, voici un exemple:


Sub Macro1()
With ActiveSheet.ChartObjects("Graphique 1")
.Width = 150
.Height = 150
.Top = 10
.Left = 2
End With
End Sub


A+