Chart.HeightPercent (Word)
Gibt die Höhe eines 3D-Diagramms als Prozentsatz der Diagrammbreite (von 5 bis 500 Prozent) zurück oder legt diese fest.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.HeightPercent = 80
End If
End With