Chart.HeightPercent (Word)

Retorna ou define a altura de um gráfico 3D como um percentual da largura do gráfico de 5 a 500 por cento. Long de leitura/gravação.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.HeightPercent = 80 
 End If 
End With