Freigeben über


Chart.Shapes Property

Definition

Gets a Shapes object that represents all the shapes on the Chart control.

public:
 property Microsoft::Office::Interop::Excel::Shapes ^ Shapes { Microsoft::Office::Interop::Excel::Shapes ^ get(); };
public Microsoft.Office.Interop.Excel.Shapes Shapes { get; }
member this.Shapes : Microsoft.Office.Interop.Excel.Shapes
Public ReadOnly Property Shapes As Shapes

Property Value

A Shapes object that represents all the shapes on the worksheet or chart sheet.

Examples

The following code example creates a Chart and then uses the Shapes property to draw a doughnut shape on the chart.

private void AddDonutShape()
{
    this.Range["A1", "A5"].Value2 = 22;
    this.Range["B1", "B5"].Value2 = 55;

    Microsoft.Office.Tools.Excel.Chart chart1 =
        this.Controls.AddChart(this.Range["D2", "H12"], 
        "chart1");

    chart1.SetSourceData(this.Range["A1", "B5"], 
        Excel.XlRowCol.xlColumns);
    chart1.ChartType = Excel.XlChartType.xlSurface;

    chart1.Shapes.AddShape(
        Office.MsoAutoShapeType.msoShapeDonut, 50, 50, 
        50, 50);
}
Private Sub AddDonutShape()
    Me.Range("A1", "A5").Value2 = 22
    Me.Range("B1", "B5").Value2 = 55

    Dim Chart1 As Microsoft.Office.Tools.Excel.Chart = _
        Me.Controls.AddChart(Me.Range("D2", "H12"), "Chart1")

    Chart1.SetSourceData(Me.Range("A1", "B5"), Excel.XlRowCol.xlColumns)
    Chart1.ChartType = Excel.XlChartType.xlSurface

    Chart1.Shapes.AddShape(Office.MsoAutoShapeType.msoShapeDonut, _
        50, 50, 50, 50)
End Sub

Applies to