Series.PictureUnit2 (Word)

Cette propriété renvoie ou définit l'unité de chaque image du graphique si la propriété PictureType (TypeImage) est définie à xlStackScale; dans le cas contraire, cette propriété est ignorée.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart.SeriesCollection(1) 
 .PictureType = xlScale 
 .PictureUnit2 = 5 
 End With 
 End If 
End With