Freigeben über

Chart.BarShape Property

  • Reference

Definition

Namespace:
Microsoft.Office.Tools.Excel
Assembly:
Microsoft.Office.Tools.Excel.dll

Gets or sets the shape used with the 3-D bar or column chart.

public:
 property Microsoft::Office::Interop::Excel::XlBarShape BarShape { Microsoft::Office::Interop::Excel::XlBarShape get(); void set(Microsoft::Office::Interop::Excel::XlBarShape value); };
public Microsoft.Office.Interop.Excel.XlBarShape BarShape { get; set; }
member this.BarShape : Microsoft.Office.Interop.Excel.XlBarShape with get, set
Public Property BarShape As XlBarShape

Property Value

XlBarShape

One of the XlBarShape values.

Examples

The following code example creates a 3-D Chart and then prompts the user to change the bar shape to pyramids by using the BarShape property.

private void SetBarShape()
{
    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.xl3DColumn;

    if (DialogResult.Yes ==
        MessageBox.Show("Set the bar shape to pyramids?",
        "Example", MessageBoxButtons.YesNo))
    {
        chart1.BarShape = Excel.XlBarShape.xlPyramidToMax;
    }
}

Private Sub SetBarShape()
    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.xl3DColumn

    If DialogResult.Yes = MessageBox.Show("Set the bar shape to pyramids?", _
        "Example", MessageBoxButtons.YesNo) Then
        Chart1.BarShape = Excel.XlBarShape.xlPyramidToMax
    End If
End Sub

Applies to