在用VC操作Excel的时候，生成图表有时是不可避免的，这里记下如何通过ChartWizard来简单生成一个图表。首先我们得了解一下图表的组成结构，一个简单的chart通常包括标题、绘图区、图例、数值（X）轴标题、数值（Y）轴标题，绘图区由N个数据系列组成。通过ChartWizard来生成图表非常的简单。网页“?id=3819&cid=15”对ChartWizard方法的参数有一个比较详细的介绍，在操作Excel时经常会用到一些枚举常量，对于这些枚举常量建议大家去这个网站搜一下“?72607/viewspace-155176”。
下面的代码演示了如何简单的通过ChartWizard非交互式的生成一个图表。当然了，你首先得要按照上一篇讲的方法新添加一些必要的类：_Chart、ChartObjects、ChartObject
// 变量的定义_Application app;Workbooks books;_Workbook book;Worksheets sheets;_Worksheet sheet;Range range;LPDISPATCH lpDisp; COleVariant vResult;COleVariantcovTrue((short)TRUE),covFalse((short)FALSE),covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);//创建Excel 2003服务器(启动Excel)if (!app.CreateDispatch(“Excel.Application”,NULL)) { AfxMessageBox(“Create Excel service failure!”);return;}// 设置为FALSE时，后面的app.Quit();注释要打开// 否则EXCEL.EXE进程会一直存在，并且每操作一次就会多开一个进程app.SetVisible(TRUE);books.AttachDispatch(app.GetWorkbooks(),true);
book = books.Add(covOptional);// 添加一个工作簿，这里没有open操作，在最后调用SaveCopyAs另存为
// 得到Worksheets sheets.AttachDispatch(book.GetWorksheets(),true);// 得到Worksheetsheet.AttachDispatch(sheets.GetItem(_variant_t((short)(1)))); // 得到全部Cells range.AttachDispatch(sheet.GetCells(),true);
range.SetItem(_variant_t((LONG)1),_variant_t((LONG)1),_variant_t(“X”));range.SetItem(_variant_t((LONG)1),_variant_t((LONG)2),_variant_t(“Y1”));range.SetItem(_variant_t((LONG)1),_variant_t((LONG)3),_variant_t(“Y2”));
// 将数据填入Excel表格for (int i = 0; i < 8; i++){range.SetItem(_variant_t((LONG)(2+i)),_variant_t((LONG)1),_variant_t((long)(i+1)));range.SetItem(_variant_t((LONG)(2+i)),_variant_t((LONG)2),_variant_t((long)((i+1)*(i+1))));range.SetItem(_variant_t((LONG)(2+i)),_variant_t((LONG)3),_variant_t((long)((i+1)*2)));}
// 图表(chart)/*******************************************************************************************/double left = 200, top = 160, width = 450, height = 260;
_Chart chart;ChartObjects chartobjects;ChartObject chartobject;lpDisp = sheet.ChartObjects(covOptional);ASSERT(lpDisp);chartobjects.AttachDispatch(lpDisp);chartobject = chartobjects.Add(left, top, width, height);
chart.AttachDispatch(chartobject.GetChart());chart.SetChartType(72); // xlXYScatterSmooth
lpDisp = sheet.GetRange(COleVariant(“B1”), COleVariant(“C9”));ASSERT(lpDisp);
VARIANT var;var.vt = VT_DISPATCH;var.pdispVal = lpDisp;chart.ChartWizard(var, // Source.covOptional,// GallerycovOptional,// Format: 1~6.COleVariant((short)2), // PlotBy: 指定系列中的数据是来自行(1)还是来自列(2).COleVariant((short)0), // CategoryLabels.COleVariant((short)1), // SeriesLabels.COleVariant((short)TRUE), // HasLegend.COleVariant(“chart title”), // Title.COleVariant(“XXX”), // CategoryTitle.COleVariant(“YYY”), // ValueTitles.covOptional // ExtraTitle.);
book.SaveCopyAs(_variant_t(“E://test.xls”));app.SetDisplayAlerts(false); // 不弹出对话框询问是否保存 //app.Quit(); // 退出//释放对象 range.ReleaseDispatch();sheet.ReleaseDispatch();sheets.ReleaseDispatch();book.ReleaseDispatch();books.ReleaseDispatch();app.ReleaseDispatch();
伟人之所以伟大，是因为他与别人共处逆境时，
