Поделиться через


Chart.SetDefaultChart - метод

Задает имя шаблона диаграммы, используемого Microsoft Office Excel при создании новых диаграмм.

Пространство имен:  Microsoft.Office.Tools.Excel
Сборка:  Microsoft.Office.Tools.Excel (в Microsoft.Office.Tools.Excel.dll)

Синтаксис

'Декларация
Sub SetDefaultChart ( _
    Name As Object _
)
void SetDefaultChart(
    Object Name
)

Параметры

  • Name
    Тип: System.Object
    Строка с именем шаблона диаграммы, используемого по умолчанию при создании новых диаграмм.Это может быть имя диаграммы в коллекции пользовательских шаблонов или одно из значений Microsoft.Office.Interop.Excel.XlChartType, определяющее встроенный шаблон диаграммы.

Примеры

Следующий пример устанавливает шаблон диаграммы по умолчанию равным линейному типу диаграммы. Следующий пример добавляет новую диаграмму на активный лист и заполняет ее из источника данных из указанного диапазона на листе. Для запуска этого примера, в вашей книге должен быть лист с именем Sheet1 с диаграммой с именем Chart_1.

Private Sub SetDefaultLineChartTemplate()
    ' Set default chart template
    Dim myChart As Microsoft.Office.Tools.Excel.Chart = _
        Globals.Sheet1.Chart_1
    myChart.SetDefaultChart(Excel.XlChartType.xlLine)

    ' 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")
    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.Item("A1", "B4")
    myNewChart.SetSourceData(data)
End Sub
private void SetDefaultLineChartTemplate()
{
    // Set default chart template
    Microsoft.Office.Tools.Excel.Chart myChart =
        Globals.Sheet1.Chart_1;
    myChart.SetDefaultChart(Excel.XlChartType.xlLine);

    // Add a new chart and populate source data
    Microsoft.Office.Tools.Excel.Chart myNewChart = 
        Globals.Sheet1.Controls.AddChart(
            Globals.Sheet1.Range["D5","J16"],"myNewChart");                      
    Globals.Sheet1.Range["A1","A1"].Value2 = "Product";
    Globals.Sheet1.Range["B1","B1"].Value2 = "Units Sold";            
    for (int i = 1; i<4; i++)
    {
        Globals.Sheet1.Range["A" + (i + 1).ToString(),missing].Value2 = "Product" + i.ToString();
        Globals.Sheet1.Range["B" + (i + 1).ToString(),missing].Value2 = i * 10;
    }
    Excel.Range data = Globals.Sheet1.Range["A1", "B4"];
    myNewChart.SetSourceData(data, missing);
}

Безопасность платформы .NET Framework

См. также

Ссылки

Chart Интерфейс

Microsoft.Office.Tools.Excel - пространство имен