0

请有人可以帮我解决这个问题,因为它让我发疯!

我正在务实地使用 C# 和 COM 接口创建一个 excel 图表。

我已经使用图表向导创建了图表。

然后我想在这个图表中添加更多系列。我可以添加系列,但额外的数据在新列上,它们不会自动创建。

我会以错误的方式解决这个问题吗?

添加图表:

public void MakeExcelChart(string startRange, string endRange, string chartTitle, string seriesName)
    {
        ExcelChart = (Excel.Chart)ExcelWBook.Charts.Add(Missing.Value, Missing.Value, Missing.Value, Missing.Value);
        ExcelApp.Visible = true;
        ExcelChart.HasTitle = true;
        ExcelChart.ChartTitle.Text = chartTitle;

        ExcelRange = ExcelWSheet.get_Range(startRange, endRange);

        ExcelChart.ChartWizard(ExcelRange, Excel.XlChartType.xlColumnClustered, Missing.Value, Excel.XlRowCol.xlColumns, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);

        ExcelChart.ApplyDataLabels(Microsoft.Office.Interop.Excel.XlDataLabelsType.xlDataLabelsShowBubbleSizes, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);

        ExcelChart.ChartArea.Fill.OneColorGradient(Microsoft.Office.Core.MsoGradientStyle.msoGradientHorizontal, 1, 1);

        GetSeriesCollection();

        ExcelSeries = ExcelSeriesCollection.Item(1);
        ExcelSeries.Name = seriesName;
    }

并添加系列:

public void AddSeries(string col1, string col2, string startRange, string endRange, string seriesName)
    {
        ExcelSeries = ExcelSeriesCollection.NewSeries();

        ExcelSeries.HasDataLabels = true;

        ExcelRange = ExcelWSheet.get_Range(col1+startRange, col1+endRange);

        ExcelSeries.XValues = ExcelRange;

        ExcelRange = ExcelWSheet.get_Range(col2+startRange, col2+endRange);

        ExcelSeries.Values = ExcelRange;

        ExcelChart.HasLegend = true;

        ExcelSeries.Name = seriesName;

       }
4

2 回答 2

2

尝试这样的事情。它对我很有效。

Excel.ChartObjects xlChart = (Excel.ChartObjects)xlWorkSheet.ChartObjects(Type.Missing);
Excel.ChartObject myChart = (Excel.ChartObject)xlChart.Add(1050, 865, 690, 265);
Excel.Chart chartPage = myChart.Chart;
chartPage.ChartType = Excel.XlChartType.xlColumnClustered;
chartPage.HasTitle = true;
chartPage.ChartTitle.Text = "title";
chartPage.HasLegend = true;

Excel.SeriesCollection oSeriesCollection = (Excel.SeriesCollection)myChart.Chart.SeriesCollection(misValue);
Excel.Series series1 = oSeriesCollection.NewSeries();
Excel.Series series2 = oSeriesCollection.NewSeries();
Excel.Series series3 = oSeriesCollection.NewSeries();

Excel.Range series1_range = xlWorkSheet.get_Range("start_range1","end_range1");
Excel.Range series2_range = xlWorkSheet.get_Range("start_range2","end_range2");
Excel.Range series3_range = xlWorkSheet.get_Range("start_range3","end_range3");

series1.Values = series1_range;
series2.Values = series2_range;
series3.Values = series3_range;

然后,您可以单独更改每个系列的参数,例如:

series1.Name = "some name";

等等。

于 2013-02-08T21:23:56.893 回答
0

您需要扩展定义数据的 Excel 表。很好的例子是 http://blogs.msdn.com/vsod/archive/2009/06/15/creating-charts-in-word-and-powerpoint-using-newly-introduced-object-model-in-office- 2007-服务包-2.aspx

于 2009-10-02T10:43:41.827 回答