`
huozheleisi
  • 浏览: 1227019 次
文章分类
社区版块
存档分类
最新评论

使用VC++操作Excel文件

 
阅读更多

版权声明:转载时请以超链接形式标明文章原始出处和作者信息及本声明
http://xfrog.blogbus.com/logs/24923682.html

本文档适用于:
  • Microsoft Foundation Classes (MFC), Microsoft Visual C++, 32-bit Editions, version 6.0 以上
  • Microsoft OLE 库
第一步:建立一个自动化工程
  1. 启动VC 6.0,打开新建对话框,新建一个MFC AppWizard(exe)工程,这里工程明设置为TestExcel。
  2. 进入MFC 应用程序向导,选择 基本对话框,直接点击完成,工程文件结构如下图:
    点击查看原始尺寸
  3. 打开MFC ClassWizard窗口(查看—>建立类向导),选择Automation,单击Add Class按钮,选择From a type library...,弹出文件选择对话框,之后定位到Microsoft Office的安装目录(通常为C:/Program Files/Microsoft Office/Office),选择EXCEL9.OLB注意,确定后,弹出Confirm Classes窗口,选择列表中的所有类,单击OK按钮。
    注意文件名EXCEL9.OLB,因安装的Office版本不同而有所差异,EXCEL9.OLB对应的是Microsoft Office 2000,微软命名方式为Excel+数字的形式,Office版本越高,数字越大。
    点击查看原始尺寸
  4. 返回编辑器,查看工程文件,可发现多了EXCEL9.H及EXCEL9.CPP两个文件。
  5. 打开stdafx.h头文件确保包含如下头文件:
    #include <afxdisp.h>
    #include "excel9.h"
  6. 打开TestExcel.cpp文件,修改CTestExcelApp::InitInstance(),加入如下代码:
    BOOL CTestExcelApp::InitInstance()
    {
    if( !AfxOleInit() ){
    AfxMessageBox("初始化Ole出错!");
    return FALSE;
    }
    AfxEnableControlContainer();
    ......
    ......
    return FALSE;
    }
    为保证编译时不产生重复定义错误,打开excel9.h文件,在文件开始位置加入如下代码:
    #if !defined _HEAD_FILE_EXCEL9_
    #define _HEAD_FILE_EXCEL9_
    相应的,在文件末尾加入:
    #endif
    到此,OLE自动化工程建立完成。按下F7,看是否能通过编译。
第二步:操作EXCEL文件
  1. 选择ResourceView工作区,打开IDD_TESTEXCEL_DIALOG,在对话框中添加一个按钮控件Button1,双击它,生成一个Button1 Click事件的处理函数:
    void CTestExcelDlg::OnButton1()
    {
    // TODO: Add your control notification handler code here

    }
  2. 在OnButton1()函数中,添加代码:
    void CTestExcelDlg::OnButton1()
    {
    // TODO: Add your control notification handler code here
    _Application app;
    Workbooks books;
    _Workbook book;
    Worksheets sheets;
    _Worksheet sheet;
    Range range;
    Font font;
    Range cols;
    COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

    if( !app.CreateDispatch("Excel.Application") ){
    this->MessageBox("无法创建Excel应用!");
    return;
    }
    books=app.GetWorkbooks();
    book=books.Add(covOptional);
    sheets=book.GetSheets();
    sheet=sheets.GetItem(COleVariant((short)1));
    range=sheet.GetRange(COleVariant("A1"),COleVariant("A1"));
    range.SetValue(COleVariant("HELLO EXCEL!"));
    font=range.GetFont();
    font.SetBold(COleVariant((short)TRUE));
    range=sheet.GetRange(COleVariant("A2"),COleVariant("A2"));
    range.SetFormula(COleVariant("=RAND()*100000"));
    range.SetNumberFormat(COleVariant("$0.00"));
    cols=range.GetEntireColumn();
    cols.AutoFit();

    app.SetVisible(TRUE);
    app.SetUserControl(TRUE);

    }
  3. 按下Ctrl+F5,执行程序。按下Button1,将会弹出Excel窗口:
    点击查看原始尺寸
  4. 到此,即完成了我们的示例程序,下面将对程序进行详细的说明,如果大家有过使用Visual Basic操作Excel程序的经验,则应该能看懂下面程序:
    void CTestExcelDlg::OnButton1()
    {
    // TODO: Add your control notification handler code here
    /*
    先创建一个_Application类,用_Application来创建一个Excel应用程序接口。
    Excel接口类中层次如下所示:
    -_Application
    -Workbooks 工作薄集合
    -_Workbook 工作薄
    -Worksheets 工作表集合
    -_Worksheet 工作表
    -Range单元格区域
    故要操作表,必须先逐步获取Workbooks—>Workbook —>Worksheets —>Worksheet —>Range
    */
    _Application app;
    Workbooks books;
    _Workbook book;
    Worksheets sheets;
    _Worksheet sheet;
    Range range; //Excel中针对单元格的操作都应先获取其对应的Range对象
    Font font;
    Range cols;
    /*
    COleVariant类为VARIANT数据类型的包装,在自动化程序中,通常都使用VARIANT数据类型进行参数传递。故下列程序中,函数参数都是通过COleVariant类来转换了的。
    */
    //covOptional 可选参数的VARIANT类型
    COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    if( !app.CreateDispatch("Excel.Application") ){
    this->MessageBox("无法创建Excel应用!");
    return;
    }

    //获取工作薄集合
    books=app.GetWorkbooks();

    //添加一个工作薄
    book=books.Add(covOptional);

    //获取工作表集合
    sheets=book.GetSheets();

    //获取第一个工作表
    sheet=sheets.GetItem(COleVariant((short)1));

    //选择工作表中A1:A1单元格区域
    range=sheet.GetRange(COleVariant("A1"),COleVariant("A1"));

    //设置A1=HELLO EXCEL!"
    range.SetValue(COleVariant("HELLO EXCEL!"));

    //调整格式,设置粗体
    font=range.GetFont();
    font.SetBold(COleVariant((short)TRUE));

    //选择A2单元格,插入一个公式"=RAND()*100000",并设置A2数字格式为货币形式
    range=sheet.GetRange(COleVariant("A2"),COleVariant("A2"));
    range.SetFormula(COleVariant("=RAND()*100000"));
    range.SetNumberFormat(COleVariant("$0.00"));

    //选择A:A列,设置宽度为自动适应
    cols=range.GetEntireColumn();
    cols.AutoFit();

    //显示Excel表格,并设置状态为用户可控制
    app.SetVisible(TRUE);
    app.SetUserControl(TRUE);
  5. 如何自动保存我们生成的Excel文件?通过Workbook对象的SaveAs方法即可实现:
    book.SaveAs(COleVariant("C://a.xls"),covOptional,
    covOptional,covOptional,
    covOptional,covOptional,(long)0,covOptional,covOptional,covOptional,
    covOptional);
  6. 上面的程序只能实现新建Excel文件的功能,但大多数情况我们需要的是导入excel中的数据,即要打开现存的xls文件,那么可用如下代码:
    _Application app;
    Workbooks books;
    _Workbook book;
    Worksheets sheets;
    _Worksheet sheet;
    LPDISPATCH lpDisp; //接口指针
    COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    if( !app.CreateDispatch("Excel.Application") ){
    this->MessageBox("无法创建Excel应用!");
    return;
    }

    books=app.GetWorkbooks();
    lpDisp = books.Open("C://a.xls",
    covOptional, covOptional, covOptional, covOptional,
    covOptional, covOptional, covOptional, covOptional,
    covOptional, covOptional, covOptional, covOptional
    );
    book.AttachDispatch( lpDisp );
    sheets=book.GetSheets();
    sheet=sheets.GetItem(COleVariant((short)1));
    range=sheet.GetRange(COleVariant("A1"),COleVariant("A1"));

    COleVariant rValue;
    rValue=COleVariant(range.GetValue());
    rValue.ChangeType(VT_BSTR);
    this->MessageBox(CString(rValue.bstrVal));

    book.SetSaved(TRUE);
    app.Quit();
  7. 运行上面程序,单击Button1按钮,会显示出C:/a.xls文件中A1单元格中的内容。注意看以下代码,实现了Variant数据类型转换为CString类,这个只是一个示例,转换较为简单。

COleVariant rValue;
rValue=COleVariant(range.GetValue());
rValue.ChangeType(VT_BSTR);
this->MessageBox(CString(rValue.bstrVal));

本文GoogleDoc地址:http://docs.google.com/View?docid=dgmz5395_2kc7npcn
PDF格式文件下载:http://xfrog.blogbus.com/files/12162963300.pdf

分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics