C#操作Word实现插入图表

引用dll

using Word = Microsoft.Office.Interop.Word;//操作word
using Excel = Microsoft.Office.Interop.Excel;//操作excel

初始化操作Word

                Object Nothing = System.Reflection.Missing.Value;
                //Directory.CreateDirectory("C:/CNSI");  //创建文件所在目录
                //string name = "CNSI_" + DateTime.Now.ToLongDateString() + ".doc";
                object filename = path;  //文件保存路径
                //创建Word文档
                Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
                Microsoft.Office.Interop.Word.Document WordDoc = WordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
在Excel中创建图表,然后复制到Word中
Excel.Application eApp = new Excel.Application();//创建Excel进程  
                eApp.Visible = false;//设置Excel可见  
                Excel.Workbook book = eApp.Workbooks.Add();//增加一个workboo  
                Excel.Worksheet sheet = eApp.Worksheets[1];//获取第一个Worksheet  
                Excel.Range range = sheet.get_Range("A1", "D2");//获取A1到D2范围内的Range  
                                                                //向表格中插入数据  
                range.Cells[1][1] = "姓名";
                range.Cells[1][2] = "成绩";
                range.Cells[2][1] = "张三";
                range.Cells[2][2] = "89";
                range.Cells[3][1] = "李四";
                range.Cells[3][2] = "100";
                range.Cells[4][1] = "王五";
                range.Cells[4][2] = "95";

                //插入图表À  
                Excel.Chart xlChart = book.Charts.Add();
                //设置图表源  
                xlChart.SetSourceData(range);
                //拷贝表格  
                Word.Range wdRange = WordDoc.Range(); ;
                //拷贝Excel中某个sheet数据到word
                wdRange.SetRange(wdRange.End, wdRange.End + 1);
                xlChart.ChartArea.Copy();
                wdRange.Paste(); 



猜你喜欢

转载自blog.csdn.net/qq_35513598/article/details/80307464