Chart.Floor (Word)

Retorna a base do gráfico 3D. Somente leitura piso.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.Floor.Interior.ColorIndex = 5 
 End If 
End With