Chart.SideWall Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Возвращает объект, представляющий боковую стенку объемной диаграммы.
public Microsoft.Office.Interop.Excel.Walls SideWall { get; }
Значение свойства
Объект Walls, представляющий боковую стенку объемной диаграммы.
Примеры
В следующем примере кода добавляется трехмерная гистограмма с группировкой по столбцу Sheet1 и устанавливается стиль 4. Затем в примере создается диапазон произвольных данных и устанавливается в качестве исходных данных диаграммы. Затем в коде указываются цвета стен и пол диаграммы.
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
Комментарии
Используйте SideWall свойство, чтобы отформатировать боковую стенку трехмерной диаграммы.