Has3DEffect Property Example

This example gives series one on the embedded bubble chart a three-dimensional appearance.

With Worksheets(1).ChartObjects(1).Chart
    .SeriesCollection(1).Has3DEffect = True
End With