使用Microsoft Office所带的控件来实现代码操作excel表格。

摘要：使用Microsoft Office所带的控件来实现代码操作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()调用之前加入初始化的代码：

     

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

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

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

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

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

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

    // 变量的定义
    _Application app;
    Workbooks books;
    _Workbook book;
    Worksheets sheets;
    _Worksheet sheet;
    Range range;
    LPDISPATCH lpDisp;
    COleVariant vResult;

    CString str = "";

    COleVariant
        covTrue((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);

    /*
    *   打开一个工作簿。
    *   Excel 2000 只需要13个参数就行，Excel 2003需要15个参数
    */
    lpDisp = books.Open("E://test.xls",
        covOptional, covOptional, covOptional, covOptional,
        covOptional, covOptional, covOptional, covOptional,
        covOptional, covOptional, covOptional, covOptional,
        covOptional, covOptional);
    ASSERT(lpDisp);

    book.AttachDispatch(lpDisp);

    // 得到Worksheets
    sheets.AttachDispatch(book.GetWorksheets(),true);

    // 得到Worksheet
    sheet.AttachDispatch(sheets.GetItem(_variant_t((short)(1))));

    // 得到全部Cells
    range.AttachDispatch(sheet.GetCells(),true);


    // 往单元格A1里写入字符串数据，就像操作矩阵一样，第1行第1列
    range.SetItem(_variant_t((LONG)1),_variant_t((LONG)1),_variant_t("hello word!"));

    // 往单元格A2里写入时间数据
    range.AttachDispatch(sheet.GetRange(_variant_t("A2"), _variant_t("A2")),true);
    range.SetValue2(_variant_t("2011/02/15"));

    // 往单元格A3~A6里写入浮点数据
    range.AttachDispatch(sheet.GetRange(_variant_t("A3"), _variant_t("A6")),true);
    range.SetValue2(_variant_t((double)3.14));

    // 设置单元格的列宽为12
    range.AttachDispatch(sheet.GetRange(_variant_t("A1"), _variant_t("A1")),true);
    range.SetColumnWidth(_variant_t((long)12));

    // 所有单元格居中显示
    range.AttachDispatch(sheet.GetCells(),true);
    range.SetHorizontalAlignment(_variant_t((long)-4108)); // -4108:居中，-4131:靠左，-4152:靠右
    range.SetVerticalAlignment(_variant_t((long)-4108)); // -4108:居中，-4160:靠上，-4107:靠下

    // 读取单元格的数据，第4行第1列
    range.AttachDispatch(range.GetItem(_variant_t((long)(4)),_variant_t((long)(1))).pdispVal );
    vResult =range.GetValue(covOptional);

    switch (vResult.vt)
    {
    case VT_BSTR:       // 字符串
        str=vResult.bstrVal;
        break;
    case VT_R8:         // 8字节的数字
        str.Format("%f",vResult.dblVal);
        break;
    case VT_DATE:       // 时间格式
        SYSTEMTIME st;
        VariantTimeToSystemTime(vResult.date, &st);
        break;
    case VT_EMPTY:      // 单元格空的
        str="";
        break;
    }
    //MessageBox(str);

    Font ft;    // 要插入excel类库里面的Font类，下面类似

    range.AttachDispatch(sheet.GetRange(_variant_t("A3"), _variant_t("A5")),true);
    ft.AttachDispatch(range.GetFont());
    ft.SetName(_variant_t("华文行楷")); // 字体
    ft.SetSize(_variant_t((long)12));   // 字号
    //ft.SetColorIndex(_variant_t((long)3));    // 字的颜色: 红色
         ft.SetColor( _variant_t((long) RGB(255, 0, 0) ) );
    ft.SetBold(_variant_t((long)1));    // 1：粗体，0：非粗体

    Interior it; // 底色设置

    range.AttachDispatch(sheet.GetRange(_variant_t("C3"), _variant_t("E6")),true);
    it.AttachDispatch(range.GetInterior());
    it.SetColorIndex(_variant_t((long)20)); // 底色设置为浅青色

    Borders borders; // 先设置区域内所有单元格的边框
    borders = range.GetBorders();
    borders.SetColorIndex(_variant_t((long)1));
    borders.SetLineStyle(_variant_t((long)1));
    borders.SetWeight(_variant_t((long)2));

    // 然后设置外边框
    // LineStyle=线型(1~13) Weight=线宽 ColorIndex=线的颜色(-4105为自动, 1为黑色)
    range.BorderAround(_variant_t((long)9),_variant_t((long)1),_variant_t((long)1),vtMissing);

    range.AttachDispatch(sheet.GetRange(_variant_t("C8"), _variant_t("D9")),true);
    // 合并单元格
    range.Merge(_variant_t((long)0));


    book.Save();                    // 保存Excel的内容
//  app.SetDisplayAlerts(false);    // 不弹出对话框询问是否保存
//  app.Quit();                     // 退出

    //释放对象
    range.ReleaseDispatch();
    sheet.ReleaseDispatch();
    sheets.ReleaseDispatch();
    book.ReleaseDispatch();
    books.ReleaseDispatch();
    app.ReleaseDispatch();

[c-sharp] view plain copy

1. .h文件：  
2. #include "comdef.h"   
3. #include "excel.h"  
4. class ExcelFile   
5. {  
6. public:  
7. void ShowInExcel(bool bShow);  
8. CString GetCell(int iRow, int iColumn);  
9. int     GetCellInt(int iRow, int iColumn);  
10. int GetRowCount();  
11. int GetColumnCount();  
12. bool LoadSheet(int iIndex);  
13. CString GetSheetName(int iIndex);  
14. static void InitExcel();  
15. static void ReleaseExcel();  
16. int GetSheetCount();  
17. bool Open(CString FileName);  
18. ExcelFile();  
19. virtual ~ExcelFile();  
20. protected:  
21. private:  
22. static _Application m_ExcelApp;  
23.   
24. Workbooks    m_Books;   
25. _Workbook    m_Book;   
26. Worksheets   m_sheets;   
27. _Worksheet   m_sheet;   
28. Range        m_Rge;   
29. };  
30. .cpp文件：  
31. ExcelFile::ExcelFile()  
32. {  
33. }  
34. ExcelFile::~ExcelFile()  
35. {  
36. m_Rge.ReleaseDispatch();   
37. m_sheet.ReleaseDispatch();   
38. m_sheets.ReleaseDispatch();   
39. m_Book.ReleaseDispatch();   
40. m_Books.ReleaseDispatch();   
41. }  
42. void ExcelFile::InitExcel()  
43. {  
44. //创建Excel 2000服务器(启动Excel)   
45. if (!m_ExcelApp.CreateDispatch("Excel.Application",NULL))   
46. {   
47. AfxMessageBox("创建Excel服务失败!");   
48. exit(1);   
49. }   
50. }  
51. void ExcelFile::ReleaseExcel()  
52. {  
53. m_ExcelApp.ReleaseDispatch();  
54. }  
55. bool ExcelFile::Open(CString FileName)  
56. {  
57. //打开excel文件  
58. //利用模板文件建立新文档   
59. m_Books.AttachDispatch(m_ExcelApp.GetWorkbooks(),true);   
60. LPDISPATCH lpDis = NULL;  
61. lpDis = m_Books.Add(_variant_t(FileName)); // 如何判断文件是否打开？  
62. if (lpDis)  
63. {  
64. m_Book.AttachDispatch(lpDis);   
65. //得到Worksheets   
66. m_sheets.AttachDispatch(m_Book.GetWorksheets(),true);   
67. return true;  
68. }  
69. return false;  
70. }  
71. int ExcelFile::GetSheetCount()  
72. {  
73. return m_sheets.GetCount();  
74. }  
75. CString ExcelFile::GetSheetName(int iIndex)  
76. {  
77. _Worksheet sheet;  
78. sheet.AttachDispatch(m_sheets.GetItem(_variant_t((long)iIndex)),true);  
79. CString name = sheet.GetName();  
80. sheet.ReleaseDispatch();  
81. return name;  
82. }  
83. bool ExcelFile::LoadSheet(int iIndex)  
84. {  
85. LPDISPATCH lpDis = NULL;  
86. m_Rge.ReleaseDispatch();  
87. m_sheet.ReleaseDispatch();  
88. lpDis = m_sheets.GetItem(_variant_t((long)iIndex));  
89. if (lpDis)  
90. {  
91.         m_sheet.AttachDispatch(lpDis,true);  
92.         m_Rge.AttachDispatch(m_sheet.GetCells(), true);  
93.         return true;  
94. }  
95. return false;  
96. }  
97. int ExcelFile::GetColumnCount()  
98. {  
99. Range range;  
100. Range usedRange;  
101. usedRange.AttachDispatch(m_sheet.GetUsedRange(), true);  
102. range.AttachDispatch(usedRange.GetColumns(), true);  
103. int count = range.GetCount();  
104. usedRange.ReleaseDispatch();  
105. range.ReleaseDispatch();  
106. return count;  
107. }  
108. int ExcelFile::GetRowCount()  
109. {  
110. Range range;  
111. Range usedRange;  
112. usedRange.AttachDispatch(m_sheet.GetUsedRange(), true);  
113. range.AttachDispatch(usedRange.GetRows(), true);  
114. int count = range.GetCount();  
115. usedRange.ReleaseDispatch();  
116. range.ReleaseDispatch();  
117. return count;  
118. }  
119. CString ExcelFile::GetCell(int iRow, int iColumn)  
120. {  
121. Range range;  
122. range.AttachDispatch(m_Rge.GetItem (COleVariant((long)iRow),COleVariant((long)iColumn)).pdispVal, true);  
123.     COleVariant vResult =range.GetValue2();  
124. CString str;  
125. if(vResult.vt == VT_BSTR)       //字符串  
126. {  
127. str=vResult.bstrVal;  
128. }  
129. else if (vResult.vt==VT_INT)  
130. {  
131.         str.Format("%d",vResult.pintVal);  
132. }  
133. else if (vResult.vt==VT_R8)     //8字节的数字   
134. {  
135. str.Format("%f",vResult.dblVal);  
136. //str.Format("%.0f",vResult.dblVal);  
137. //str.Format("%1f",vResult.fltVal);  
138. }  
139. else if(vResult.vt==VT_DATE)    //时间格式  
140. {  
141. SYSTEMTIME st;  
142. VariantTimeToSystemTime(vResult.date, &st);  
143. }  
144. else if(vResult.vt==VT_EMPTY)   //单元格空的  
145. {  
146.     str="(NULL)";  
147. }   
148. range.ReleaseDispatch();  
149. return str;  
150. }  
151. int ExcelFile::GetCellInt(int iRow, int iColumn)  
152. {  
153. Range range;  
154. range.AttachDispatch(m_Rge.GetItem(COleVariant((long)iRow),COleVariant((long)iColumn)).pdispVal, true);  
155. COleVariant vResult =range.GetValue2();  
156. int num;  
157. num = (int)vResult.date;  
158. range.ReleaseDispatch();  
159. return num;  
160. }  
161. void ExcelFile::ShowInExcel(bool bShow)  
162. {  
163. m_ExcelApp.SetVisible(bShow);  
164. }