如何从Excel表格生成图表?

5
我可以在将datatable传入以下函数时生成Excel文件:
public static void ExportDataTableToExcel(DataTable dt, string filepath)
{
    object missing = Type.Missing;

    object misValue = System.Reflection.Missing.Value;

    //create excel
    Microsoft.Office.Interop.Excel.Application excel = new Microsoft.Office.Interop.Excel.Application();

    //add excel workbook
    Microsoft.Office.Interop.Excel.Workbook wb = excel.Workbooks.Add();

    //add worksheet to workbook
    Microsoft.Office.Interop.Excel.Worksheet ws = wb.Sheets[1] as Microsoft.Office.Interop.Excel.Worksheet;

    //add 2nd worksheet to workbook
    Microsoft.Office.Interop.Excel.Worksheet ws2 = wb.Sheets[2] as Microsoft.Office.Interop.Excel.Worksheet;

    //Set the header-row bold
    ws.Range["A1", "A1"].EntireRow.Font.Bold = true;

    //Adjust all columns
    ws.Columns.AutoFit();

   //spit top row
    ws.Application.ActiveWindow.SplitRow = 1;

    //insert image into worsheet 2
    ws2.Shapes.AddPicture("C:\\Koala.JPG", Microsoft.Office.Core.MsoTriState.msoFalse, Microsoft.Office.Core.MsoTriState.msoCTrue, 50, 50, 300, 300); 

    //freeze top row
    ws.Application.ActiveWindow.FreezePanes = true;


    int rowCount = 1;

    foreach (DataRow dr in dt.Rows)
    {
        rowCount += 1;

        for (int i = 1; i < dt.Columns.Count + 1; i++)
        {
            // Add the header the first time through

            if (rowCount == 2)
            {
                ws.Cells[1, i] = dt.Columns[i - 1].ColumnName;
                ws.Cells[1, i].Interior.ColorIndex = 40;

                // add cell border
                ws.Cells[1, i].Borders.LineStyle = Excel.XlLineStyle.xlContinuous;
            }

            ws.Cells[rowCount, i] = dr[i - 1].ToString();

            // add cell border
            ws.Cells[rowCount, i].Borders.LineStyle = Excel.XlLineStyle.xlContinuous;
        }
    }

    Microsoft.Office.Interop.Excel.Range range = (Microsoft.Office.Interop.Excel.Range)ws.UsedRange;

    Console.Write(range.ToString());

    wb.SaveAs(@"C:\Test.xls", Excel.XlFileFormat.xlWorkbookNormal, misValue,
                                         misValue, misValue, misValue,
                                         Excel.XlSaveAsAccessMode.xlExclusive, misValue,
                                         misValue, misValue, misValue, misValue);

    wb.Close(missing, missing, missing);

    excel.Quit();
}

这个函数运行良好。我需要从C#代码向这个Excel文件中添加一个图形。我尝试了几种方法,但没有找到合适的实现方式。

1个回答

16

请查看此处的教程(这是谷歌搜索结果中的其中一篇文章)。

它非常清晰地描述了如何通过C#代码在Excel中制作简单图表。

大致思路如下:

// Add chart.
var charts = worksheet.ChartObjects() as
    Microsoft.Office.Interop.Excel.ChartObjects;
var chartObject = charts.Add(60, 10, 300, 300) as
    Microsoft.Office.Interop.Excel.ChartObject;
var chart = chartObject.Chart;

// Set chart range.
var range = worksheet.get_Range(topLeft, bottomRight);
chart.SetSourceData(range);

// Set chart properties.
chart.ChartType = Microsoft.Office.Interop.Excel.XlChartType.xlLine;
chart.ChartWizard(Source: range,
    Title: graphTitle,
    CategoryTitle: xAxis,
    ValueTitle: yAxis);

谢谢,它运行得很好。我对C#和Interop还有点陌生。 - user3467827
很高兴能够帮助。 - Baldrick
@Baldrick - 感谢添加语法,但此链接已失效。 - Michael Mormon
2
@MichaelMormon:谢谢,我已经更新了链接,现在它包含几乎相同的内容,但是仍然有效。 - Baldrick

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接