次の方法で共有


Chart.SideWall Property

Definition

Gets an object that represents the side wall of a 3-D chart.

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

Property Value

A Walls object that represents the side wall of a 3-D chart.

Examples

The following code example adds a 3-D clustered column chart to Sheet1 and sets its style to style 4. The example then creates a range of arbitrary data and sets it as the chart source data. Next, the code specifies the colors of the chart walls and floor.

private void SetChartBackWalls()
{
    // Add a new chart and populate source data
    Microsoft.Office.Tools.Excel.Chart myNewChart =
    Globals.Sheet1.Controls.AddChart(
        Globals.Sheet1.Range["D5", "J16"], "myNewChart");
    myNewChart.ChartType = Excel.XlChartType.xl3DColumnClustered;
    // Set chart style
    myNewChart.ChartStyle = 4;

    Globals.Sheet1.Range["A1"].Value2 = "Product";
    Globals.Sheet1.Range["B1"].Value2 = "Units Sold";
    
    for (int i=1; i<4; i++)
    {
        Globals.Sheet1.Range["A" + (i + 1).ToString()].Value2 =
            "Product" + i.ToString();
        Globals.Sheet1.Range["B" + (i + 1).ToString()].Value2 = 
            i * 10;
    }
    Excel.Range data = Globals.Sheet1.Range["A1", "B4"];
    myNewChart.SetSourceData(data);

    // Set foreground color for 3D chart walls and floor
    myNewChart.BackWall.Format.Fill.ForeColor.RGB =
        System.Drawing.Color.LightGray.ToArgb();
    myNewChart.SideWall.Format.Fill.ForeColor.RGB =
        System.Drawing.Color.LightGray.ToArgb();
    myNewChart.Floor.Format.Fill.ForeColor.RGB = 
        System.Drawing.Color.Gray.ToArgb();        
}
Private Sub SetChartBackWalls()
    ' Add a new chart and populate source data
    Dim myNewChart As Microsoft.Office.Tools.Excel.Chart = _
    Globals.Sheet1.Controls.AddChart( _
        Globals.Sheet1.Range("D5", "J16"), "myNewChart")
    myNewChart.ChartType = Excel.XlChartType.xl3DColumnClustered
    ' Set chart style
    myNewChart.ChartStyle = 4

    Globals.Sheet1.Range("A1").Value2 = "Product"
    Globals.Sheet1.Range("B1").Value2 = "Units Sold"
    Dim i As Integer
    For i = 1 To 3
        Globals.Sheet1.Range("A" + (i + 1).ToString()).Value2 = _
            "Product" + i.ToString()
        Globals.Sheet1.Range("B" + (i + 1).ToString()).Value2 = i * 10
    Next
    Dim data As Excel.Range = Globals.Sheet1.Range("A1", "B4")
    myNewChart.SetSourceData(data)

    ' Set foreground color for 3D chart walls and floor
    myNewChart.BackWall.Format.Fill.ForeColor.RGB = _
        System.Drawing.Color.LightGray.ToArgb()
    myNewChart.SideWall.Format.Fill.ForeColor.RGB = _
        System.Drawing.Color.LightGray.ToArgb()
    myNewChart.Floor.Format.Fill.ForeColor.RGB = _
        System.Drawing.Color.Gray.ToArgb()
End Sub

Remarks

Use the SideWall property to format the side wall of a 3-D chart.

Applies to