VC操作Excel之基本操作

 最近由于工作需要，不得不操作Excel，包括基本的数据输入输出、字体设置、颜色设置、单元格的合并、填充色的设置，当然还包括图表的生成以及渐近线的操作等。折腾了许久，项目终于完成了^_^。现在将学习操作Excel的点点滴滴记录下来和大家一同分享，也作为自己的一次总结。

      1、Excel的对象模型（有人称其为层次结构）

      打开一个Excel工作表，点击“工具”->“宏”->“Visual Basic 编辑器”选项打开VB的编辑器，打开帮助文档，里面“Microsoft Excel Visual Basic 参考”下的“Microsoft Excel 对象模型”展示了完整的Excel的层次结构，是不是有点类似于MFC的继承图表啊？利用帮助文档我们可以找到一些需要的知识，下面介绍一些类：

      _Application：表示整个的Excel应用程序，包含一个工作簿集合

      Workbooks：工作簿集合，包含N个工作簿（Workbook）

      _Workbook：工作簿，包含一个工作表（sheets）集合

      Worksheets：工作表集合，包含N个工作表

      _Worksheet：工作表，也就是我们在Excel中看到的Sheet1、Sheet2、Sheet3，它是我们操作Excel的基本单位

      Range：这是单元格的集合，我们知道Excel是由一个个的单元格组成的，通过Range来操作单元格

      Font：用于设置单元格的字体、颜色、字号、粗体设置

      Interior：设置底色

      Boards：设置区域内所有单元格的边框，如果要设置一组区域的外边框的话用Rang->BorderAround设置

      下面用一个具体的例子来说明怎么通过MFC来操作Excel

      2、Excel库的插入

      在我们MFC的工程中，按Ctrl+W打开MFC类向导对话框，点击“Add Class...”->“From a type Library...”，找到你所使用的excel类型库，我使用的在目录C:/Program Files/Microsoft Office/OFFICE11下的“EXCEL.EXE”文件，查找时文件类型选“All Files”，然后添加我们所需要的类，通常以上列举的前6类是必须的，其它的需要时再添加。我不认为全部添加是一种好的做法，一个我觉得很乱，另外生成的excel.cpp文件会很大。我建议浏览一遍这些类，这样当你做些操作时可以更清楚的知道需要添加哪些类。添加完需要的类后，我们就可以来做一些基本的操作了。

      3、Com支持库的初始化

      通常在App的InitInstance()里面加入初始化和关闭COM库的操作，在DoModal()调用之前加入初始化的代码：

     

[cpp]  view plain  copy

1. if (CoInitialize(NULL) != 0)   
2. {   
3.     AfxMessageBox("初始化COM支持库失败!");   
4.     exit(1);   
5. }   

      在return之前加入CoUninitialize(); 关闭CON库。

      4、代码演示一些基本的操作

      首先别忘了包含头文件“excel.h”，若用到_variant_t()时，需要包含头文件“comdef.h”和“comutil.h”，否则会出现错误：

“error C2065: '_variant_t' : undeclared identifier”。

      下面的代码包括了一些基本的操作：

[cpp]  view plain  copy

1.     // 变量的定义  
2.     _Application app;  
3.     Workbooks books;  
4.     _Workbook book;  
5.     Worksheets sheets;  
6.     _Worksheet sheet;  
7.     Range range;  
8.     LPDISPATCH lpDisp;      
9.     COleVariant vResult;  
10.   
11.     CString str = "";  
12.       
13.     COleVariant  
14.         covTrue((short)TRUE),  
15.         covFalse((short)FALSE),  
16.         covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);  
17.       
18.     //创建Excel 2003服务器(启动Excel)  
19.     if (!app.CreateDispatch("Excel.Application",NULL))   
20.     {   
21.         AfxMessageBox("Create Excel service failure!");  
22.         return;  
23.     }  
24.   
25.     // 设置为FALSE时，后面的app.Quit();注释要打开  
26.     // 否则EXCEL.EXE进程会一直存在，并且每操作一次就会多开一个进程  
27.     app.SetVisible(TRUE);  
28.     books.AttachDispatch(app.GetWorkbooks(),true);  
29.       
30.     /* 
31.     *   打开一个工作簿。 
32.     *   Excel 2000 只需要13个参数就行，Excel 2003需要15个参数 
33.     */  
34.     lpDisp = books.Open("E://test.xls",  
35.         covOptional, covOptional, covOptional, covOptional,  
36.         covOptional, covOptional, covOptional, covOptional,  
37.         covOptional, covOptional, covOptional, covOptional,  
38.         covOptional, covOptional);  
39.     ASSERT(lpDisp);  
40.       
41.     book.AttachDispatch(lpDisp);  
42.       
43.     // 得到Worksheets    
44.     sheets.AttachDispatch(book.GetWorksheets(),true);   
45.       
46.     // 得到Worksheet  
47.     sheet.AttachDispatch(sheets.GetItem(_variant_t((short)(1))));     
48.       
49.     // 得到全部Cells   
50.     range.AttachDispatch(sheet.GetCells(),true);  
51.   
52.       
53.     // 往单元格A1里写入字符串数据，就像操作矩阵一样，第1行第1列  
54.     range.SetItem(_variant_t((LONG)1),_variant_t((LONG)1),_variant_t("hello word!"));  
55.   
56.     // 往单元格A2里写入时间数据  
57.     range.AttachDispatch(sheet.GetRange(_variant_t("A2"), _variant_t("A2")),true);  
58.     range.SetValue2(_variant_t("2011/02/15"));  
59.   
60.     // 往单元格A3~A6里写入浮点数据  
61.     range.AttachDispatch(sheet.GetRange(_variant_t("A3"), _variant_t("A6")),true);  
62.     range.SetValue2(_variant_t((double)3.14));  
63.   
64.     // 设置单元格的列宽为12  
65.     range.AttachDispatch(sheet.GetRange(_variant_t("A1"), _variant_t("A1")),true);  
66.     range.SetColumnWidth(_variant_t((long)12));  
67.   
68.     // 所有单元格居中显示  
69.     range.AttachDispatch(sheet.GetCells(),true);  
70.     range.SetHorizontalAlignment(_variant_t((long)-4108)); // -4108:居中，-4131:靠左，-4152:靠右  
71.     range.SetVerticalAlignment(_variant_t((long)-4108)); // -4108:居中，-4160:靠上，-4107:靠下  
72.   
73.     // 读取单元格的数据，第4行第1列  
74.     range.AttachDispatch(range.GetItem(_variant_t((long)(4)),_variant_t((long)(1))).pdispVal );  
75.     vResult =range.GetValue(covOptional);  
76.       
77.     switch (vResult.vt)  
78.     {  
79.     case VT_BSTR:       // 字符串  
80.         str=vResult.bstrVal;  
81.         break;  
82.     case VT_R8:         // 8字节的数字  
83.         str.Format("%f",vResult.dblVal);  
84.         break;  
85.     case VT_DATE:       // 时间格式  
86.         SYSTEMTIME st;  
87.         VariantTimeToSystemTime(vResult.date, &st);  
88.         break;  
89.     case VT_EMPTY:      // 单元格空的  
90.         str="";  
91.         break;  
92.     }  
93.     //MessageBox(str);  
94.   
95.     Font ft;    // 要插入excel类库里面的Font类，下面类似  
96.       
97.     range.AttachDispatch(sheet.GetRange(_variant_t("A3"), _variant_t("A5")),true);  
98.     ft.AttachDispatch(range.GetFont());  
99.     ft.SetName(_variant_t("华文行楷")); // 字体   
100.     ft.SetSize(_variant_t((long)12));   // 字号  
101.     //ft.SetColorIndex(_variant_t((long)3));    // 字的颜色: 红色  
102.          ft.SetColor( _variant_t((long) RGB(255, 0, 0) ) );  
103.     ft.SetBold(_variant_t((long)1));    // 1：粗体，0：非粗体  
104.   
105.     Interior it; // 底色设置  
106.       
107.     range.AttachDispatch(sheet.GetRange(_variant_t("C3"), _variant_t("E6")),true);  
108.     it.AttachDispatch(range.GetInterior());       
109.     it.SetColorIndex(_variant_t((long)20)); // 底色设置为浅青色  
110.   
111.     Borders borders; // 先设置区域内所有单元格的边框  
112.     borders = range.GetBorders();  
113.     borders.SetColorIndex(_variant_t((long)1));  
114.     borders.SetLineStyle(_variant_t((long)1));  
115.     borders.SetWeight(_variant_t((long)2));  
116.   
117.     // 然后设置外边框  
118.     // LineStyle=线型(1~13) Weight=线宽 ColorIndex=线的颜色(-4105为自动, 1为黑色)   
119.     range.BorderAround(_variant_t((long)9),_variant_t((long)1),_variant_t((long)1),vtMissing);  
120.   
121.     range.AttachDispatch(sheet.GetRange(_variant_t("C8"), _variant_t("D9")),true);  
122.     // 合并单元格  
123.     range.Merge(_variant_t((long)0));  
124.   
125.   
126.     book.Save();                    // 保存Excel的内容  
127. //  app.SetDisplayAlerts(false);    // 不弹出对话框询问是否保存  
128. //  app.Quit();                     // 退出  
129.   
130.     //释放对象    
131.     range.ReleaseDispatch();  
132.     sheet.ReleaseDispatch();  
133.     sheets.ReleaseDispatch();  
134.     book.ReleaseDispatch();  
135.     books.ReleaseDispatch();  
136.     app.ReleaseDispatch();  

 

      上面就是一些对于Excel的基本操作，如果有什么问题希望大家能够指出！