VS2010对Excel操作---DLL向
最近公司有个项目要用到Excel的操作，于是自己就对VC中关于Excel的操作进行整理了下。而这里我是直接做成DLL方便他人调用的。
创建一个MFC Dll项目。
- 选择MFC扩展DLL。
- 在“类视图”---“添加类”---在MFC中选择“TypeLib中的MFC类”，按如图所示选择，并添加对应的类
PS:由于我电脑上安装的是office2010，所以对应的Excel版本号是14.0，各位可以根据自己的情况选择。 - 删除这六个类的头文件中的第一句，如图，并将头文件添加到“stdafx.h"中
- 修改字符集，vs2010默认生成的是使用unicode字符集，这里我们把它修改为”使用多字节字符集“，这样能避免很多不必要的麻烦。
- 接下来进行编译，正常情况下会出现如下错误：
这时候定位到警告处，在函数名之前加上下划线就OK了。如图：
这样编译就没什么问题了。 接下就是直接添加导出函数来，这里我偷个懒直接到dllmain.cpp这个文件里面加了，大家可以根据自己的习惯来。
extern "C" _declspec(dllexport) void ReadExcel(const CString& strPath,const CString& strFlag, const vector<CString>& vTarget,vector<CString>& vOutTarget)
{
CApplication _app;
CWorkbook _book;
CWorkbooks _books; CWorksheet _sheet;
CWorksheets _sheets;
CRange _rang; if (!_app.CreateDispatch(_T("Excel.Application")))
{
MessageBox(NULL,_T("Error!Creat Excel Application Server Faile!"),_T("Creat Excel Application Server"),MB_ICONERROR);
exit();
}
_books = _app.get_Workbooks();
_book = _books.Add(_variant_t(strPath)); _sheets = _book.get_Worksheets();
_sheet = _sheets.get_Item(_variant_t("电力电缆井")); //获取行列数
CRange _usedRang;
_usedRang.AttachDispatch(_sheet.get_UsedRange(),TRUE);
_rang.AttachDispatch(_usedRang.get_Columns(),TRUE);
long nColumn = _rang.get_Count();//列
_rang.ReleaseDispatch();
_rang.AttachDispatch(_usedRang.get_Rows(),TRUE);
long nRow = _rang.get_Count();//行
_rang.ReleaseDispatch();
_usedRang.ReleaseDispatch();
//遍历
_rang.AttachDispatch(_sheet.get_Cells(),TRUE);//获取所有单元格
CString str;
long nCurRow = ;
long nCurColumn = ;
//获取关键字所在的行列号
for (long i = ; i <= nRow; ++i)
{
for (long j = ; j <= nColumn; ++j)
{
CRange _currentRang;
_currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)i),COleVariant((long)j)).pdispVal,TRUE);
COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
{
str = vResult.bstrVal;
}
else if (VT_INT==vResult.vt)
{
str.Format(_T("%d"),vResult.pintVal);
}
else if (VT_R8==vResult.vt)//8字节数字
{
str.Format(_T("%f"),vResult.dblVal);
}
else if (VT_DATE==vResult.vt)//时间格式
{
SYSTEMTIME st;
VariantTimeToSystemTime(vResult.date,&st);
}
else if (VT_EMPTY==vResult.vt)//空单元格
{
str = "(NULL)";
}
_currentRang.ReleaseDispatch();
if (strFlag==str)//直接使用goto语句跳出双重循环
{
nCurRow = i;
nCurColumn = j;
goto LOOPOUT;
}
}
} LOOPOUT:
vector<long> vNTarget;//目标列所在的列号
for (long i = ;i <= nColumn;++i)
{
CRange _currentRang;
_currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)),COleVariant((long)i)).pdispVal,TRUE);
COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
{
str = vResult.bstrVal;
}
else if (VT_INT==vResult.vt)
{
str.Format(_T("%d"),vResult.pintVal);
}
else if (VT_R8==vResult.vt)//8字节数字
{
str.Format(_T("%f"),vResult.dblVal);
}
else if (VT_DATE==vResult.vt)//时间格式
{
SYSTEMTIME st;
VariantTimeToSystemTime(vResult.date,&st);
}
else if (VT_EMPTY==vResult.vt)//空单元格
{
str = "(NULL)";
}
_currentRang.ReleaseDispatch();
//对取出来的str和目标str进行配对
for (vector<CString>::size_type j = ;j != vTarget.size(); ++j)
{
if (vTarget.at(j)==str)
{
vNTarget.push_back(i);
break;
}
}
}
//接下来根据获取的行号nCurRow和列号vNTarget来读取指定内容
for (vector<CString>::size_type i = ; i != vTarget.size(); ++i)
{
CRange _currentRang;
_currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)nCurRow),COleVariant((long)vNTarget.at(i))).pdispVal,TRUE);
COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
{
str = vResult.bstrVal;
}
else if (VT_INT==vResult.vt)
{
str.Format(_T("%d"),vResult.pintVal);
}
else if (VT_R8==vResult.vt)//8字节数字
{
str.Format(_T("%f"),vResult.dblVal);
}
else if (VT_DATE==vResult.vt)//时间格式
{
SYSTEMTIME st;
VariantTimeToSystemTime(vResult.date,&st);
}
else if (VT_EMPTY==vResult.vt)//空单元格
{
str = "(NULL)";
}
_currentRang.ReleaseDispatch();
vOutTarget.push_back(str);
} _book.ReleaseDispatch();
_books.ReleaseDispatch();
151 _app.Quit();_app.ReleaseDispatch();
}
上述函数就是打开路径strPath的Excel文件，并通过标志符strFlag找到要读取的行，通过vTarget找到要读取的列，将读取的内容输出到vOutTarget中。这里我是默认表格的第一行就是存放的表头，大家可以根据自己的实际情况进行调整。- 接下来再添加一个关于更新（即写某个单元格的函数）
extern "C" _declspec(dllexport) void UpdateExcel(const CString& strPath,const CString& strFlag,const vector<CString>& vTarget,const vector<CString>& vInTarget)
{
CApplication _app;
CWorkbook _book;
CWorkbooks _books; CWorksheet _sheet;
CWorksheets _sheets;
CRange _rang; if (!_app.CreateDispatch(_T("Excel.Application")))
{
MessageBox(NULL,_T("Error!Creat Excel Application Server Faile!"),_T("Creat Excel Application Server"),MB_ICONERROR);
exit();
}
_books = _app.get_Workbooks();
_book = _books.Add(_variant_t(strPath)); _sheets = _book.get_Worksheets();
_sheet = _sheets.get_Item(_variant_t("电力电缆井")); //获取行列数
CRange _usedRang;
_usedRang.AttachDispatch(_sheet.get_UsedRange(),TRUE);
_rang.AttachDispatch(_usedRang.get_Columns(),TRUE);
long nColumn = _rang.get_Count();//列
_rang.ReleaseDispatch();
_rang.AttachDispatch(_usedRang.get_Rows(),TRUE);
long nRow = _rang.get_Count();//行
_rang.ReleaseDispatch();
_usedRang.ReleaseDispatch();
//遍历
_rang.AttachDispatch(_sheet.get_Cells(),TRUE);//获取所有单元格
CString str;
long nCurRow = ;
long nCurColumn = ;
//获取关键字所在的行列号
for (long i = ; i <= nRow; ++i)
{
for (long j = ; j <= nColumn; ++j)
{
CRange _currentRang;
_currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)i),COleVariant((long)j)).pdispVal,TRUE);
COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
{
str = vResult.bstrVal;
}
else if (VT_INT==vResult.vt)
{
str.Format(_T("%d"),vResult.pintVal);
}
else if (VT_R8==vResult.vt)//8字节数字
{
str.Format(_T("%f"),vResult.dblVal);
}
else if (VT_DATE==vResult.vt)//时间格式
{
SYSTEMTIME st;
VariantTimeToSystemTime(vResult.date,&st);
}
else if (VT_EMPTY==vResult.vt)//空单元格
{
str = "(NULL)";
}
_currentRang.ReleaseDispatch();
if (strFlag==str)//直接使用goto语句跳出双重循环
{
nCurRow = i;
nCurColumn = j;
goto LOOPOUT;
}
}
} LOOPOUT:
vector<long> vNTarget;//目标列所在的列号
for (long i = ;i <= nColumn;++i)
{
CRange _currentRang;
_currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)),COleVariant((long)i)).pdispVal,TRUE);
COleVariant vResult = _currentRang.get_Value2(); if (VT_BSTR == vResult.vt)//字符串
{
str = vResult.bstrVal;
}
else if (VT_INT==vResult.vt)
{
str.Format(_T("%d"),vResult.pintVal);
}
else if (VT_R8==vResult.vt)//8字节数字
{
str.Format(_T("%f"),vResult.dblVal);
}
else if (VT_DATE==vResult.vt)//时间格式
{
SYSTEMTIME st;
VariantTimeToSystemTime(vResult.date,&st);
}
else if (VT_EMPTY==vResult.vt)//空单元格
{
str = "(NULL)";
}
_currentRang.ReleaseDispatch();
//对取出来的str和目标str进行配对
for (vector<CString>::size_type j = ;j != vTarget.size(); ++j)
{
if (vTarget.at(j)==str)
{
vNTarget.push_back(i);
break;
}
}
}
//更新指定的单元格
for (vector<CString>::size_type i = ; i != vInTarget.size(); ++i)
{
_rang.put_Item(COleVariant(nCurRow),COleVariant(vNTarget.at(i)),COleVariant(vInTarget.at(i)));
}_book.SaveCopyAs(COleVariant(strPath));
_book.put_Saved(TRUE);
_app.put_Visible(FALSE);
_book.ReleaseDispatch();
_books.ReleaseDispatch(); _app.Quit()
_app.ReleaseDispatch();}
参数的设置和上一个函数差不多。 - 接下来编译的时候，正常情况下会有一点小问题。这个问题如果你是基于对话框的MFC程序貌似是不会出现的，只有创建DLL或者ActiveX控件才会出现。
这个问题也是烦恼了我好久，解决方法是先在文件头导入一个lib
在编译，运气好的话就没什么问题了。运气不好还会出下如下问题。
这个时候我们修改下项目属性
把我标出来的选项改为否应该就没什么问题了。 - 最后编译完成通过。这样dll和lib就都生成好了，大家可以尽情的使用了。
- 差不多就这样了，至于其他的问题，比如如果直接创建的是基于对话框的MFc程序的话就更简单了。跟着步骤走就完事了。最后我是一个菜鸟，如果有什么问题也欢迎大家指教。
VS2010对Excel操作---DLL向的更多相关文章
- Excel操作 Microsoft.Office.Interop.Excel.dll的使用
----转载: http://www.cnblogs.com/lanjun/archive/2012/06/17/2552920.html 先说说题外话,前段时间近一个月,我一直在做单据导入功能,其中 ...
- MFC -- Excel操作简介（基于VS2010）
一.添加与 Excel 操作相关的头文件 项目 -> 类向导,在右上方有一个下拉栏,选择其中的 类型库中的MFC类(T),即可看到下图所示界面,选择“文件”选项,然后在下方的位置选项中添加本地文 ...
- Npoi导入导出Excel操作
之前公司的一个物流商系统需要实现对订单的批量导入和导出,翻阅了一些资料,最后考虑使用NPOI实现这个需求. 在winform上面实现excel操作:http://www.cnblogs.com/Cal ...
- Excel 操作类
转载:http://www.cnblogs.com/fellowcheng/archive/2010/08/21/1805158.html ExcelHelper(Excel2007) Code hi ...
- VS2010 EXCEL2010 表格操作的编程实现
参考: http://blog.csdn.net/wxfy1977/article/details/3847450(另外一种实现方式,数据库方式) http://blog.csdn.net/evkj2 ...
- C#封装的VSTO Excel操作类
自己在用的Excel操作类,因为经常在工作中要操作Excel文件,可是使用vba实现起来实在是不方便,而且编写也很困难,拼接一个字符串都看的眼花. 这个时候C#出现了,发现使用C#来操作Excel非常 ...
- Excel报表开发（本节主要讲述导出到Excel操作）
一.Excel导入到GridView以及数据库操作比较简单,这儿不做过多讲解,需要注意的有二点: 1.设置IMEX=1将强制混合数据转换为文本. 2.解决Excel驱动程序默认读取8行:将" ...
- Delphi Excel 操作大全
Delphi Excel 操作大全 (一) 使用动态创建的方法首先创建 Excel 对象,使用ComObj:var ExcelApp: Variant;ExcelApp := CreateOleObj ...
- VS2010 C++环境下DLL和LIB文件目录及名称修改
VS2010 C++环境下DLL和LIB文件目录及名称修改 转自:http://blog.csdn.net/archielau/article/details/8507581 DLL工程,Debug版 ...
随机推荐
- BZOJ2287: 【POJ Challenge】消失之物
2287: [POJ Challenge]消失之物 Time Limit: 10 Sec Memory Limit: 128 MBSubmit: 254 Solved: 140[Submit][S ...
- 【转】ios中@class和 #import 的使用时机
代码中会发现有部分#import操作写在m文件中,而h文件仅仅使用@class进行声明,为什么不直接把#import放到h文件中呢? 这是因为h文件在修改后,所有import该h文件的所有文件必须重 ...
- 数学：lucas定理的总结
今天考试的题目中有大组合数取模,不会唉,丢了45分,我真是个弱鸡,现在还不会lucas. 所以今天看了一下,定理差不多是: (1)Lucas定理:p为素数,则有: 即:lucas(n,m,p)=c(n ...
- 使用 Visual Studio 生成通用的 XAML 应用程序 （Windows Phone 和 Windows 通用程序）
在Build会议上,我们发布了新的版本---Windows Phone 8.1. Windows 8.1 平台.作为开发人员,这意味着您现在可以生成 XAML 和 HTML 的通用程序,并通过分享大量 ...
- C++域宽设置
域宽设置,域宽填充; 设置域宽, cout<<set[w-width](int n)<<被设置的输出内容 设置填充字符, cout<<setfill(char n) ...
- Android 镜像地址[持续更新中]
这里收集android国内镜像资源地址 大连东软信息学院镜像服务器地址:– http://mirrors.neusoft.edu.cn 端口:80北京化工大学镜像服务器地址:– IPv4: http: ...
- Ajax交互demo1
一.概念 Ajax异步请求刷新. 浏览器在用户不知道的情况下,偷偷地跟服务器交互,然后返回数据给浏览器显示. 异步过程:当HTTP请求发送后,通过Ajax技术使用的XMLHttpRequest对象来发 ...
- 【C#】与C及OC的不同点
事实上熟悉这些语言的朋友们深知,这几个语言全然没有可比性. 因为工作须要,近期须要重温C#语言,难免会受到C和OC的基础知识影响. 此篇是本人的 一个学习笔记.仅此献给有C/OC基础,须要继续学习C# ...
- java基础入门-arraylist存储开销
今天我们来看一下arraylist的存储开销,由于在项目其中,我尝试了一个很大的arraylist.然后内存爆了 所以我看了下源代码.原来arraylist的存储开销是比較大的,先上代码 import ...
- VSS的运用小内容（针对于vs2008版本）（小的问题都是，仅供参考--只针对于菜鸟级的）
自己开始接触vss 的时候有些小的习惯没有很好的养成,下面的有关VSS内容都是简单的迁入迁出的问题,(仅供参考) 1.文件的迁入迁出:(.txt..xlsx..doc) a:文件的覆盖问题: 对于文件 ...