偶看新闻水暖件名称:使用VC++操作Excel文件 - 我不会飞 - 博客大巴
来源：百度文库 编辑：偶看新闻 时间：2024/04/29 18:15:50
使用VC++操作Excel文件 - [程序设计]2008-07-17
版权声明：转载时请以超链接形式标明文章原始出处和作者信息及本声明
http://xfrog.blogbus.com/logs/24923682.html
本文档适用于：
Microsoft Foundation Classes (MFC), Microsoft Visual C++, 32-bit Editions, version 6.0 以上 Microsoft OLE 库
第一步：建立一个自动化工程
启动VC 6.0，打开新建对话框，新建一个MFC AppWizard(exe)工程，这里工程明设置为TestExcel。
进入MFC 应用程序向导，选择 基本对话框，直接点击完成，工程文件结构如下图：
打开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版本越高，数字越大。
返回编辑器，查看工程文件，可发现多了EXCEL9.H及EXCEL9.CPP两个文件。
打开stdafx.h头文件确保包含如下头文件： #include #include "excel9.h"
打开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文件
选择ResourceView工作区，打开IDD_TESTEXCEL_DIALOG，在对话框中添加一个按钮控件Button1，双击它，生成一个Button1 Click事件的处理函数：
void CTestExcelDlg::OnButton1()
{
// TODO: Add your control notification handler code here
}
在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);
}
按下Ctrl+F5，执行程序。按下Button1，将会弹出Excel窗口：
到此，即完成了我们的示例程序，下面将对程序进行详细的说明，如果大家有过使用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);
如何自动保存我们生成的Excel文件？通过Workbook对象的SaveAs方法即可实现：
book.SaveAs(COleVariant("C:\\a.xls"),covOptional,
covOptional,covOptional,
covOptional,covOptional,(long)0,covOptional,covOptional,covOptional,
covOptional); 上面的程序只能实现新建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(); 运行上面程序，单击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
收藏到：Del.icio.us
Tag：MFCVCEXCEL
引用地址：
xfrog 发表于20:03:41 |编辑 |分享1
引用
下面Blog引用了该文：
使用VC++操作Excel文件（转）
Blog：朱超的博客
2010-08-17 11:21:16
评论
很详细，还配了图，谢谢！
who8736 | 发表于2010-08-19 23:15:05 [回复]
您好，为什么我载入以后出现--------------------
'GetItem' : is not a member of 'Parameters'
d:\项目过程研究\2010.8\8.07\excel9.h(7504) : see declaration of 'Parameters'
menglu503 | 发表于2010-08-07 11:14:57 [回复]
楼主这篇文章写得非常好，对我的帮助很大
不过在第六点少了一个对象的定义
Range range;
还有就是Open函数好像是15个参数，而不是13个，所以最好再加两个covOptional，covOptional
就可以了
张旭 | 发表于2010-03-24 15:56:40 [回复]
你真是好心人啊。。
太谢谢了。。
爱死你了。。
李楠 | 发表于2010-02-15 06:12:47 [回复]
多学点
cheap ugg boots | 发表于2009-10-16 11:30:18 [回复]
是啊
Tiffany Bangles | 发表于2009-09-16 22:48:11 [回复]
office2003应该找什么excel9.0.OLB？
2003里没有excel11或excel10之类的文件。
2003是excel.exe
asd | 发表于2009-06-10 16:28:42 [回复]
office2003应该找什么excel9.0.OLB？
2003里没有excel11或excel10之类的文件。
2003是excel.exe
asd | 发表于2009-06-10 16:28:26 [回复]
office2003应该找什么excel9.0.OLB？
2003里没有excel11或excel10之类的文件。
timothy | 发表于2009-05-06 17:48:03 [回复]
range.GetValue会有内存泄漏，楼主是怎么解决的，谢谢
cruiser | 发表于2008-12-30 14:47:45 [回复]
perfect~Thanks very much^_^
sakura | 发表于2008-11-26 18:48:09 [回复]
为什么我的程序总是说创建Excel进程失败呢？
EastSun111 | 发表于2008-08-26 19:50:21 [回复]
版权声明：转载时请以超链接形式标明文章原始出处和作者信息及本声明
http://xfrog.blogbus.com/logs/24923682.html
本文档适用于：
Microsoft Foundation Classes (MFC), Microsoft Visual C++, 32-bit Editions, version 6.0 以上 Microsoft OLE 库
第一步：建立一个自动化工程
启动VC 6.0，打开新建对话框，新建一个MFC AppWizard(exe)工程，这里工程明设置为TestExcel。
进入MFC 应用程序向导，选择 基本对话框，直接点击完成，工程文件结构如下图：
打开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版本越高，数字越大。
返回编辑器，查看工程文件，可发现多了EXCEL9.H及EXCEL9.CPP两个文件。
打开stdafx.h头文件确保包含如下头文件： #include
打开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文件
选择ResourceView工作区，打开IDD_TESTEXCEL_DIALOG，在对话框中添加一个按钮控件Button1，双击它，生成一个Button1 Click事件的处理函数：
void CTestExcelDlg::OnButton1()
{
// TODO: Add your control notification handler code here
}
在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);
}
按下Ctrl+F5，执行程序。按下Button1，将会弹出Excel窗口：
到此，即完成了我们的示例程序，下面将对程序进行详细的说明，如果大家有过使用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);
如何自动保存我们生成的Excel文件？通过Workbook对象的SaveAs方法即可实现：
book.SaveAs(COleVariant("C:\\a.xls"),covOptional,
covOptional,covOptional,
covOptional,covOptional,(long)0,covOptional,covOptional,covOptional,
covOptional); 上面的程序只能实现新建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(); 运行上面程序，单击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
收藏到：Del.icio.us
Tag：MFCVCEXCEL
引用地址：
xfrog 发表于20:03:41 |编辑 |分享1
引用
下面Blog引用了该文：
使用VC++操作Excel文件（转）
Blog：朱超的博客
2010-08-17 11:21:16
评论
很详细，还配了图，谢谢！
who8736 | 发表于2010-08-19 23:15:05 [回复]
您好，为什么我载入以后出现--------------------
'GetItem' : is not a member of 'Parameters'
d:\项目过程研究\2010.8\8.07\excel9.h(7504) : see declaration of 'Parameters'
menglu503 | 发表于2010-08-07 11:14:57 [回复]
楼主这篇文章写得非常好，对我的帮助很大
不过在第六点少了一个对象的定义
Range range;
还有就是Open函数好像是15个参数，而不是13个，所以最好再加两个covOptional，covOptional
就可以了
张旭 | 发表于2010-03-24 15:56:40 [回复]
你真是好心人啊。。
太谢谢了。。
爱死你了。。
李楠 | 发表于2010-02-15 06:12:47 [回复]
多学点
cheap ugg boots | 发表于2009-10-16 11:30:18 [回复]
是啊
Tiffany Bangles | 发表于2009-09-16 22:48:11 [回复]
office2003应该找什么excel9.0.OLB？
2003里没有excel11或excel10之类的文件。
2003是excel.exe
asd | 发表于2009-06-10 16:28:42 [回复]
office2003应该找什么excel9.0.OLB？
2003里没有excel11或excel10之类的文件。
2003是excel.exe
asd | 发表于2009-06-10 16:28:26 [回复]
office2003应该找什么excel9.0.OLB？
2003里没有excel11或excel10之类的文件。
timothy | 发表于2009-05-06 17:48:03 [回复]
range.GetValue会有内存泄漏，楼主是怎么解决的，谢谢
cruiser | 发表于2008-12-30 14:47:45 [回复]
perfect~Thanks very much^_^
sakura | 发表于2008-11-26 18:48:09 [回复]
为什么我的程序总是说创建Excel进程失败呢？
EastSun111 | 发表于2008-08-26 19:50:21 [回复]
如何在vc中另存excel文件文件使用saveas方法，请高手指点，急！急！急！
我在使用excel时候老是随excel文件生成一个1k的小文件,不知道是为什么?
我在操作EXCEL文件时出现"不能再使用新字体"警告,这是为什么?
VC文件操作的两个问题
请问在哪能有关于vc基本操作的资料啊?我不回操作啊!!!急
VB程序，关于EXCEL文件的操作
word， excel文件要加密如何操作？
关于VC中库文件的使用？？？？
vc 中使用datagrid怎么能让数据全部导入excel表,为什么我只能导入部分数据
关于VC中的文件操作的一个问题
我有个EXCEL文件，但我不想让别人复制个文件，请问该如何操作？谢谢
excel操作
EXCEL操作?
操作excel
EXCEL工作表文件，属性变了TMP文件，不影响使用，但是发邮件给其他人，却打不开，怎么办？
EXCEL重新命名以后使用不了，该怎么操作？？？
我要学习Excel的操作知识
Excel操作问题，请教教我！
为什么最近我的excel总是说文件正在使用，因而不能更新保存
我使用AAP软件转PDF格式时为什么excel文件转不了
在使用VC编程时产生的文件
使用VC++编写的dll文件中的错误
vc.net下如何使用NMAKE编译makefile文件？
关于vc操作sql