vs2010操作office2010

目的:通过vc++读取和写入excel
环境:vs2012 office2010
1.创建一个新的工程,选择mfc application,选择dialog,在advanced features选择automation(这一项我不确定有没有必要,查资料说要选上,我就选上了)
2.创建完工程后,在dialog对话框上右击,选择class wizard(或是ctrl+shift+x)
3.在add class下拉框内选择add class from typelib
4.在add class from下面选择file,然后你的office安装目录下的EXCEL.EXE(我的目录是C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE)
5.在下面添加6个类到我们的工程,(_Application, Worksheets, _Worksheet, Workbooks, _Workbook, Range)注意有的有下划线,别添加错了
6.这个时候如果直接编译程序会提示错误,大体错误的信息如下
大体错误的信息如下
[plain] view plain copy
Error 1 error C1083: Cannot open compiler generated file: ‘d:\code\vc\exceltojson\exceltojson\debug\excel.tlh’: Permission denied d:\code\vc\exceltojson\exceltojson\capplication.h 3 1 EXCELToJSON

[plain] view plain copy
2 IntelliSense: declaration modifiers are incompatible with previous declaration d:\code\VC\EXCELToJSON\EXCELToJSON\Debug\excel.tlh 573 19 EXCELToJSON

出现很多错误,几乎都与excel.tlh这个文件相关。
解决方法就是把导入的6个类对应的头文件最开始的一句话
[cpp] view plain copy

import “C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE” no_namespace

注释掉,也就是删掉。具体原因不明,估计是这个已经更新不用了,但是模版里面没有改。所以引用了没有的东西出的错
7.做完上面的操作,再编译一下,可能还有错误,错误提示如下:
[plain] view plain copy
Error 2 error C2059: syntax error : ‘,’ d:\code\vc\exceltojson\exceltojson\crange.h 336 1 EXCELToJSON

[plain] view plain copy
3 IntelliSense: expected a type specifier d:\code\VC\EXCELToJSON\EXCELToJSON\CRange.h 336 10 EXCELToJSON

解决方法,把Range这个类自动生成的头文件(我这是CRage.h)里面的
[cpp] view plain copy
VARIANT DialogBox()
{
VARIANT result;
InvokeHelper(0xf5, DISPATCH_METHOD, VT_VARIANT, (void*)&result, NULL);
return result;
}

改成
[cpp] view plain copy
VARIANT _DialogBox()
{
VARIANT result;
InvokeHelper(0xf5, DISPATCH_METHOD, VT_VARIANT, (void*)&result, NULL);
return result;
}

也就是前面加一个下划线。具体原因不明,估计是新版本后有同名的函数
(PS: 汗,话说ms也真够坑爹,自己的各种不兼容)
8.这个时候编译一下,估计没什么问题了,那么我们就需要写代码操作excel了。网上找的代码都差不多,不过里面有几句初始化com的
[cpp] view plain copy
::CoInitialize(NULL);
if(!AfxOleInit())
{
AfxMessageBox(L”cannot initialize com”);
return 0;
}
::CoUninitialize();

在新版本的vs上会引起这个错误
Debug Assertion Failed!
Program: D:\code\VC\EXCELToJSON\Debug\EXCELToJSON.exe
File: f:\dd\vctools\vc7libs\ship\atlmfc\src\mfc\oleinit.cpp
Line: 49
For information on how your program can cause an assertion failure, see the Visual C++ documentation on asserts.
(Press Retry to debug the application)
这个错误提示更是个坑,主要原因是你的com组件初始化了两次。是由AfxOleInit这个函数导致的。(PS:你说我初始化两次不行,直说不就行了,整得跟真事似的,我哪来的f盘。真是无语。再说,这么常见的问题,为什么不能有一个准确的解释)
解决方法就是把这一段初始化的程序删掉,不用了。为什么?你可以全局匹配一下AfxOleInit,你会发现在app class内(就是和你的dlg class同名,仅仅差了Dlg的一个创建工程是系统自建的类,比如我的EXCELToJSONDlg.cpp,我们的代码大部分都是写到这里面,然后会有一个EXCELToJSON.cpp类。就是在这个类里面),系统自建的代码有了这个初始化的程序:

[cpp] view plain copy
// Initialize OLE libraries
if (!AfxOleInit())
{
AfxMessageBox(IDP_OLE_INIT_FAILED);
return FALSE;
}

9.这样应该没什么问题了,在你的程序内引入上面6个类的头文件,然后就可以操作了。实例如下:
[cpp] view plain copy

include “stdafx.h”

include “EXCELToJSON.h”

include “EXCELToJSONDlg.h”

include “DlgProxy.h”

include “afxdialogex.h”

include “CApplication.h”

include “CRange.h”

include “CWorkbook.h”

include “CWorkbooks.h”

include “CWorksheet.h”

include “CWorksheets.h”

void CEXCELToJSONDlg::OnBnClickedButtonConvert()
{
// TODO: Add your control notification handler code here
CApplication app;
CRange range;
CWorkbook book;
CWorkbooks books;
CWorksheet sheet;
CWorksheets sheets;
LPDISPATCH lpdisp;
COleVariant vresult;
COleVariant covtrue((short)TRUE);
COleVariant covfalse((short)FALSE);
COleVariant covoptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

//create the server  
if(!app.CreateDispatch(L"Excel.Application"))  
{  
    AfxMessageBox(L"Cannot start Excel server");  
    return;  
}  
app.put_Visible(FALSE);  
books.AttachDispatch(app.get_Workbooks());  

//open file  
lpdisp = books.Open(  
    ExcelFile,  
    covoptional, covfalse, covoptional, covoptional, covoptional,  
    covoptional, covoptional, covoptional, covoptional, covoptional,  
    covoptional, covoptional, covoptional, covoptional);  

//get workbook  
book.AttachDispatch(lpdisp);  

//get worksheets  
sheets.AttachDispatch(book.get_Worksheets());  

lpdisp = book.get_ActiveSheet();  
sheet.AttachDispatch(lpdisp);  

//get the used range  
CRange usedrange;  
usedrange.AttachDispatch(sheet.get_UsedRange());  

//get used row  
range.AttachDispatch(usedrange.get_Rows());  
long irownum = range.get_Count();  
long istartrow = usedrange.get_Row();  

//get used column  
range.AttachDispatch(usedrange.get_Columns());  
long icolnum = range.get_Count();  
long istartcol = usedrange.get_Column();  

CString skey = L"";  
CString svalue = L"";  
for(int j=2; j<icolnum+1; j++)  
{  
    JSON JSONObject;  
    range.AttachDispatch(usedrange.get_Item(COleVariant((long)1), COleVariant((long)j)).pdispVal);  
    vresult = range.get_Text();       
    JSONObject.LanguageTag = vresult.bstrVal;  
    for(int i=2; i<irownum+1; i++)  
    {  
        range.AttachDispatch(usedrange.get_Item(COleVariant((long)i), COleVariant((long)1)).pdispVal);  
        vresult = range.get_Text();  
        skey = vresult.bstrVal;  
        range.AttachDispatch(usedrange.get_Item(COleVariant((long)i), COleVariant((long)j)).pdispVal);  
        vresult = range.get_Text();  
        svalue = vresult.bstrVal;  

    }  


}  
double dvalue = 3;  
usedrange.put_Item(COleVariant((long)2), COleVariant((long)2), COleVariant((double)dvalue));//write to excel  
book.Save();  
book.Close(covoptional, COleVariant(ExcelFile), covoptional);  
books.Close();  
app.Quit();  

}

上面代码是打开一个指定路径的excel,然后获得使用的sheet(也就是你最后一次保存退出的那个sheet,这个你也可以通过里面的其他方法获得excel里面的其他sheet),然后获得这个sheet内使用过的区域,并遍历获取其数据,后面一点是向指定的地方插入一个数据。在vs2012下,里面的一些函数名字变了,setItem 改成put_Item等,你可以在提示的函数内找一下,看名字,应该能猜出来

xlsx文件其实是一个zip的压缩包,你可以改其后缀名然后解压,里面都是一些xml文件和一些图片等配置文件。如果你有时间,可以自己解码excel文件。

0

posted on 2016-04-14 16:36  fag888  阅读(712)  评论(0编辑  收藏  举报

导航