BasicExcel说明文档

BasicExcel说明文档

BasicExcel原始链接：http://www.codeproject.com/Articles/13852/BasicExcel-A-Class-to-Read-and-Write-to-Microsoft

一个有用的连接：

http://www.360doc.com/content/12/0426/16/7023119_206710295.shtml

为防止此链接文章丢失，文章摘录如下：

vc访问excel的两篇文章（主要介绍OLE方式）

文章一、Excel操作类-CSpreadSheet and BasicExcel

CSpreadSheet - A Class to Read and Write to Excel and Text Delimited Spreadsheet，使用ODBC操作Excel

http://www.codeproject.com/KB/database/cspreadsheet.aspx

BasicExcel - A Class to Read and Write to Microsoft Excel，直接从Excel文件格式出发，操作Excel

http://www.codeproject.com/KB/office/BasicExcel.aspx#

转载：

由于工作需要，需要在excel和mysql数据库之间互相交换数据，于是在网上搜索了一下用vc如何操作excel，基本上有三种实现方式，一种是利用odbc，一种是使用微软的automation技术，一种就是直接分析excel的格式并进行解析。

在codeproject上找到两个开源的操作类，一个是basicexcel，地址为：http://www.codeproject.com/KB/office/BasicExcel.aspx

一个是CSpreadSheet,地址为：http://www.codeproject.com/KB/database/cspreadsheet.aspx

两个我都使用了一下，最后决定使用basicexcel，下面说说我的感受：

1 CSpreadSheet，采用odbc实现，速度慢，bug多，但是对中文支持比较好，但是有个让我最不能忍受的确定，就是它把所有的数据写入excel中时都当作字符串来实现，这样导致在excel的每个field中的内容前都自动添加一个单引号，原因是excel为了防止自动格式转换，添加一个单引号使得每个数据项都强制转换成字符串类型。最后怎么都去不掉，只好放弃使用。

2 basicexcel，采用com方式实现，访问速度快，api接口也比较简单，可以随意设置excel中field内容的类型，但是对于中文的支持不好，要自己处理汉字编码，支持ansi字符和unicode字符。刚开始的时候写入的汉字都是乱码，后来自己做了字符转换，吧gb2312编码的汉字转变成unicode编码，就可以正常显示了

这两个类在官方网页上都有api使用说明和示例工程，大家一起交流...

由于刚刚使用，感受暂时就这么多了，感觉微软的东西还真是麻烦...

文章二、VC操作Excel文件编程相关内容总结

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/handsing/archive/2010/04/08/5461070.aspx

最近在做个数据库程序，因为有些数据用户要求导出到Excel文件显示（需要报给其他单位）。所以查阅了一下相关的VC的Excel编程操作，总结一下吧：（所有资料来源于网络）

利用VC操作Excel的方法至少有两种

1 .利用ODBC把Excel文件当成数据库文件，来进行读、写、修改等操作，网上有人编写了CSpreadSheet类，提供支持。

2. 利用Automation（OLD Automation）方法。将Excel当成组件服务器，利用VBA。又分为基于MFC的和SDK两种。

主要研究了一下第二种基于MFC的OLE编程方法。

一、Excel的对象模型

在对Excel编程之前首先要了解微软Excel 对象（Object）模型。（Parent-Child关系）

图 1 Office 应用程序对象模型（Excel）From msdn

其中：

       Application：代表应用程序本身。即Excel应用程序

       Workbooks：是Workbook 的集合，代表了工作薄。

       Worksheets：是Worksheet的集合，是Workbook的子对象。

       Range：是Worksheet的子对象，可以理解为Sheet中一定范围的单元格。

       Shapes：是Worksheet的子对象，用于存储图片等信息的单元格。

二、VC操作Excel的初始化过程

1、导入Excel库文件。

首先打开Class Wizard，点击"Add class"按钮下的"From a type Library"导入 office安装目录下的"excel.exe"（适用于    Excel2003），然后选择需要用的一些类，比如_Application, _Workbook, Workbooks,    Worksheets,_Wroksheet,Range,Shapes等。点击确定后，系统会在你的程序目录下生成excel.h和excel.cpp两个文件，在要使用这些导入的类时加入#include "Excel.h"即可。

     2、初始化Application。

首先, 初始化COM组件

view plaincopy to clipboardprint?
if(!AfxOleInit())   
{   
   AfxMessageBox("无法初始化COM的动态连接库");   
   return FALSE;   
}  
if(!AfxOleInit())
{
   AfxMessageBox("无法初始化COM的动态连接库");
   return FALSE;
}

然后，创建Excel 服务器(启动Excel)

定义app的全局或成员变量 _Application app;

view plaincopy to clipboardprint?
if (!app.CreateDispatch("Excel.Application"))   
{   
   AfxMessageBox("无法启动Excel服务器");   
   return FALSE;   
}  
if (!app.CreateDispatch("Excel.Application"))
{
   AfxMessageBox("无法启动Excel服务器");
   return FALSE;
}
3、设置Excel的状态

view plaincopy to clipboardprint?
app.SetVisible(bVisble); // 使Excel可见
app.SetUserControl(bControl); // 允许其他用户控制Excel  
app.SetVisible(bVisble); // 使Excel可见
app.SetUserControl(bControl); // 允许其他用户控制Excel

三、VC对Excel的操作

定义变量

     view plaincopy to clipboardprint?
Workbooks  books;   
_Workbook  book;   
Worksheets  sheets;   
_Worksheet  sheet;   
LPDISPATCH  lpDisp;   
Range   range;   
COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);  
      Workbooks  books;
      _Workbook  book;
      Worksheets  sheets;
      _Worksheet  sheet;
      LPDISPATCH  lpDisp;
      Range   range;
      COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

  1、打开已有的Excel文件

            view plaincopy to clipboardprint?
    books.AttachDispatch(app.GetWorkbooks());   
   // 或者也可以
   // books = app.GetWorkbooks();   
  lpDisp = books.Open("D:////1.xls", covOptional, covOptional,  covOptional,   covOptional, covOptional, covOptional, covOptional, covOptional, covOptional, covOptional,   
covOptional, covOptional, covOptional, covOptional);  
      books.AttachDispatch(app.GetWorkbooks());
     // 或者也可以
     // books = app.GetWorkbooks();
    lpDisp = books.Open("D:////1.xls", covOptional, covOptional,  covOptional,   covOptional, covOptional, covOptional, covOptional, covOptional, covOptional, covOptional,
  covOptional, covOptional, covOptional, covOptional);

2.、 新建一个.xls文件，并写入数据

       COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

        // Get the Workbooks collection so that you can add a new workbook
            books.AttachDispatch(app.GetWorkbooks());  // 得到Workbooks
        book = books.Add(covOptional);     // 得到Workbook
      // Get the Worksheets collection so that you can get the IDispatch for the first Worksheet
       sheets = book.GetWorksheets();     // 得到Worksheets
       sheet = sheets.GetItem(COleVariant((short)1)); // 得到Worksheet

       // 分别向每个单元格添加数据
       // Excel2000 用函数SetValue()即可, Excel2003用函数SetValue2()
      //

      range  = sheet.GetRange(COleVariant("A1"), covOptional);  // 获取A1 Range
      range.SetValue2( COleVariant("Date"));                               // 添加数据
     range = sheet.GetRange(COleVariant("B1"), covOptional);   // 获取B1 Range
     range.SetValue2(COleVariant("Order"));                               // 添加数据

     range = sheet.GetRange(COleVariant("C1"), covOptional);   // 获取C1 Range
     range.SetValue2(COleVariant("Amount"));                            // 添加数据

     range = sheet.GetRange(COleVariant("D1"), covOptional);   // 获取D1 Range
     range.SetValue2(COleVariant("Tax"));                                   // 添加数据

       // 向单元格中添加公式

    range = sheet.GetRange(COleVariant("D2"), covOptional);      // 获得D2 Range
    range = range.GetResize(COleVariant((long)NUMROWS), COleVariant((long)1)); // 重新设置D2的大小
    range.SetFormula(COleVariant("=C2*0.07"));                         // 给D2：D21设置公式

      // 设置单元格的格式

      range = sheet.GetRange(COleVariant("A1"), COleVariant("D1")); // 获得A1:D1的Range
      oFont = range.GetFont();                                                              // 获得Range的字体
      oFont.SetBold(COleVariant((short)TRUE));                                    // 设置是否粗体
      oFont.SetColor(COleVariant((long)RGB(255, 0, 0)));                     // 设置字体颜色

      oFont.SetName(COleVariant("黑体"));                                           // 设置字体类型

      range = range.GetEntireColumn();                                                // 获得全部的单元格
      range.AutoFit();                                                                            // 自动适合尺寸

3、 合并单元格

      // 思路：1.先获取A1：C1的Range范围，然后重新定义此范围，最后合并
      //          2.直接获得A1:C2的Range范围，直接合并。结果和第一种方法一样
        Range unionRange;
       unionRange = sheet.GetRange(COleVariant("A1"), COleVariant("C1")); 
       vResult = unionRange.GetMergeCells();
        unionRange = unionRange.GetResize(COleVariant((long)2), COleVariant((long)3));
        unionRange.Merge(COleVariant((long)0));      //合并单元格
        unionRange.SetRowHeight(COleVariant((short)30));   //设置单元格的高度
        unionRange.SetHorizontalAlignment(COleVariant((long)-4108));// 水平居中对齐

4、向单元格中插入图片（支持BMP、JPG格式，其他没试）

    Shapes   shapes   =   sheet.GetShapes();       // 从Sheet对象上获得一个Shapes    
    range   = sheet.GetRange(COleVariant("B16"),COleVariant("J22"));    // 获得Range对象，用来插入图片
   rgMyRge1 = range;
   shapes.AddPicture("D://Test1.jpg"   ,   false   ,   true   ,   
                                  (float)range .GetLeft().dblVal, (float)range .GetTop().dblVal,     // 从本地添加一个图片
                                  (float)range .GetWidth().dblVal, (float)range .GetHeight().dblVal);

   ShapeRange   sRange   =   shapes.GetRange(_variant_t(long(1)));

   sRange.SetHeight(float(30));   
   sRange.SetWidth(float(30)); 

5、将已建的.xls文件另存为

    COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    book.SaveAs(COleVariant("D://3.xls"),covOptional,covOptional,
                                covOptional,covOptional,covOptional,0,
                                covOptional,covOptional,covOptional,covOptional,covOptional);

6、关闭Excel服务

    COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    book.SetSaved(TRUE);     // 将Workbook的保存状态设置为已保存，即不让系统提示是否人工保存
    range.ReleaseDispatch();    // 释放Range对象
    sheet.ReleaseDispatch();    // 释放Sheet对象
    sheets.ReleaseDispatch();    // 释放Sheets对象
    book.ReleaseDispatch();     // 释放Workbook对象
    books.ReleaseDispatch();    // 释放Workbooks对象

    book.Close (covOptional, covOptional,covOptional);// 关闭Workbook对象
    books.Close();           // 关闭Workbooks对象
    app.Quit();          // 退出_Application
    app.ReleaseDispatch ();       // 释放_Application

下面是自己心得：

1、 BasicExcel_src (1).zip是此开源工具对应的源文件。

2、 BasicExcel_demo (1).zip和ExcelTest分别是作者和我做测试的两个demo。

3、 BasicExcelChinese.rar是为了解决中文路径问题对应的修改之后的源文件（作者提供的原始文件不能解决中文路径问题，在其中设定了中文环境之后，即BasicExcelChinese，则可以解决中文路径文件的读写）。当系统中可能会出现中文路径时，可以使用此源文件，但是此源文件依然不能解决excel读写中文内容的问题。

4、 但是ConvertACPToUtf8.txt中的函数ConvertACPToUtf8（）将GB2312转换为Unicode，可以解决读写中文内容问题。

5、 经测试，发现两个函数方法Save()似乎有bug不稳定，简单的读写保存可以，复杂时出现错误。而SaveAs()可以。