Chart.SetDefaultChart Метод (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

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

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

Синтаксис

'Декларация
Public Sub SetDefaultChart ( _
    Name As Object _
)
'Применение
Dim instance As Chart
Dim Name As Object

instance.SetDefaultChart(Name)

public 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);
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

Chart Класс

Chart - члены

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

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