Series.BarShape (Word)

Retorna ou define a forma usada para uma única série em um gráfico de colunas ou barras 3D. Leitura/gravação XlBarShape. Os valores de retorno possíveis são xlBox - Uma caixa, xlConeToMax - Um cone, truncado no valor especificado, xlConeToPoint - Um cone, com o a ponta no valor especificado, xlCylinder - Um cilindro, xlPyramidToMax - Uma pirâmide, truncada no valor especificado, xlPyramidToPoint - Uma pirâmide, com a ponta no valor especificado.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.SeriesCollection(1).BarShape = xlConeToPoint 
 End If 
End With