Series.PictureUnit2 (Word)

Devuelve o establece la unidad de cada imagen del gráfico si la propiedad PictureType está establecida a xlStackScale; de lo contrario, esta propiedad se omite.

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