注册 登录
  • 欢迎访问开心洋葱网站,在线教程,推荐使用最新版火狐浏览器和Chrome浏览器访问本网站,欢迎加入开心洋葱 QQ群
  • 为方便开心洋葱网用户,开心洋葱官网已经开启复制功能!
  • 欢迎访问开心洋葱网站,手机也能访问哦~欢迎加入开心洋葱多维思维学习平台 QQ群
  • 如果您觉得本站非常有看点,那么赶紧使用Ctrl+D 收藏开心洋葱吧~~~~~~~~~~~~~!
  • 由于近期流量激增,小站的ECS没能经的起亲们的访问,本站依然没有盈利,如果各位看如果觉着文字不错,还请看官给小站打个赏~~~~~~~~~~~~~!

使用VC来操作Excel表格的代码

C# 水墨上仙 2534次浏览 已收录 手机上查看

摘要:使用Microsoft Office所带的控件来实现代码操作excel表格。

操作系统是Microsoft XP,办公套装是Microsoft Office 2003,编程环境是Microsoft Visual Studio 6.0,一切都是Microsoft。
我最近要将数据库中的内容查询出来放到excel表格以便打印,所以上网找了这方面的内容,这里主要是抛砖引玉。
从思路上来看,操作excel表格就是将其打开,然后写入/读出数据,然后关闭。
转自:http://blog.csdn.net/callmeback/article/details/3906310

首先创建一个程序(我的例子是一个MFC的单文档程序),在程序的入口处和出口处先作这样两个步骤来支持COM库:
在程序入口处CXXXApp::&nbspInitInstance()函数AfxEnableControlContainer();语句之后加入下面几行:

if (CoInitialize(NULL) != 0)
{
       AfxMessageBox(“初始化COM支持库失败!”);
       exit(1);
}

假如这个条件不通过就不能运行起程序。
在程序的出口处CXXXApp::&nbspExitInstance()函数return语句之前加入下面这句话:CoUninitialize();来释放COM支持库。
这样对COM支持库的代码已经完成。
下面要从Office的安装目录中找到对VC操作excel文件的动态库,在某些版本下这个文件是Excel8.olb或者Excel9.olb,在我的版本中是excel.exe这个exe也是动态库的形式,是微软公司主要的文件结果之一。选择vc的View菜单里面的ClassWizad命令,会弹出一个对话框;然后点击Add&nbspClass…按钮选择From&nbspa&nbsptype&nbsplibrary,会弹出一个打开对话框,从这里打开Office安装目录下…/Office11/EXCEL.EXE文件,从里面选择几个要用到的类:_Application,&nbspWorkbooks,&nbsp_Wrokbook,&nbspWorksheets,&nbsp_WorkSheet,&nbspRange,点击OK按钮。会在程序中生成一个excel.h和excel.cpp文件,这些文件中包含了刚才我们选择的几个类的代码。下面介绍一下这几个类:
在vc操纵excel的exe动态库里面有好多个对象模型,就是刚才在创建过程中看到的那个列表,但是经常用到的有这么几个:_Application,&nbspWorkbooks,&nbsp_Wrokbook,&nbspWorksheets,&nbsp_WorkSheet,&nbspRange,Charts和_Chart,最后面的两个是用来操作图表的,我没有用到所以这里也就不记录了。
_Application:这里的Application就是Excel本身,众所周知,一个Excel可以包含多个工作簿,每个工作簿又可以包含多个工作表,而每个工作表又可以包含多个区域或者图表,所以这里他们是树型的结构关系,而application最基本的一个功能就是找到它的子项工作簿。果然,我们在引入我们程序的Application类中看到了这样的成员函数:GetWorkbooks()。既然application就是excel,那么打开程序,退出程序,显示/隐藏程序这些基本的操作都可以在这个类的成员函数中找到,果不其然。
Workbooks:这个对象是一个容器对象,它里面存放着所有打开的工作簿。因此,我们可以猜测它一定有添加,查找,打开/关闭工作簿的功能。(本程序中使用excel的一个xlt模板来生成一个xls文件就是使用了这个容器对象的添加功能。)
_Workbook:这是一个工作簿,也就相当于一个xls文件。Excel可以同时打开多个工作簿,所以工作簿之间必定能够互相切换,每个工作簿可以关联工作表容器并获得工作表的索引。
Worksheets:也是一个容器对象,和Workbooks类似。
_Worksheet:这个就是我们看到的工作表,比如Sheet1,sheet2等等。
Rang:就是我们看到的能选中的方框的大小。而我们所要作的操作基本上是以区域为单位进行的。
&nbsp
介绍完这些,就添加一个菜单,来响应操作excel的命令。
然后下面附带这个函数的内容,注释还算可以吧,并且附上网上不知道谁写的但是转载极多的一个封装类。

_Application _app;  
_Workbook _workBook;  
_Worksheet _workSheet;  
Worksheets workSheets;  
Workbooks workBooks;  
Range range;  
Range copyFrom;  
Range copyTo;  
  
if(!_app.CreateDispatch("Excel.Application", NULL))  
{  
    MessageBox("创建Excel服务失败!", "信息提示", MB_OK);  
    return;  
}  
//利用模板建立新文档  
workBooks.AttachDispatch(_app.GetWorkbooks());  
_workBook.AttachDispatch(workBooks.Add(_variant_t("/"C://Documents and Settings//模板.xlt/"")));//你可以自己创建一个模板,并自由设定目录  
//得到worksheets  
workSheets.AttachDispatch(_workBook.GetWorksheets());  
//得到workSheet  
_workSheet.AttachDispatch(workSheets.GetItem(_variant_t("sheet1")));  
//得到拷贝的母板  
copyFrom.AttachDispatch(_workSheet.GetRange(_variant_t("A3"), _variant_t("Q6")));  
copyTo.AttachDispatch(_workSheet.GetRange(_variant_t("A61"), _variant_t("A61")));  
//得到全部的cells  
range.AttachDispatch(_workSheet.GetCells());  
  
///////////////////////////////////////////////////////////////////////////////////////////////////  
// 上边是头  
  
/* 
中间要做的工作有这两项:设置数据和拷贝格式 
设置数据就是将数据库中查询出来的数据写入表格,拷贝格式就是将表格拷贝到别的地方。 
*/  
//写入数据  
range.SetItem(_variant_t((long)3), _variant_t((long)1), _variant_t("写入数据了"));  
range.SetItem(_variant_t((long)5), _variant_t((long)1), _variant_t("重新写入数据了"));  
//拷贝一段区域到另外的一段区域  
copyFrom.Copy(_variant_t(copyTo));  
range.SetItem(_variant_t((long)61), _variant_t((long)1), _variant_t("123"));  
  
//显示excel表格  
    _app.SetVisible(TRUE);  
//保存为文件  
_app.SetDisplayAlerts(FALSE);   //隐藏弹出的对话框  
_workSheet.SaveAs("d://Test.xls",vtMissing,vtMissing,vtMissing,vtMissing,  
    vtMissing,vtMissing,vtMissing,vtMissing,vtMissing);  
_app.Quit();  
//下边是尾  
///////////////////////////////////////////////////////////////////////////////////////////////////  
copyFrom.ReleaseDispatch();  
copyTo.ReleaseDispatch();  
range.ReleaseDispatch();  
_workSheet.ReleaseDispatch();  
workSheets.ReleaseDispatch();  
_workBook.ReleaseDispatch();  
workSheets.ReleaseDispatch();  
_app.ReleaseDispatch();  

别人的代码:

.h文件:&nbsp&nbsp

#include "comdef.h"   
#include "excel.h"  
class ExcelFile   
{  
public:  
void ShowInExcel(bool bShow);  
CString GetCell(int iRow, int iColumn);  
int     GetCellInt(int iRow, int iColumn);  
int GetRowCount();  
int GetColumnCount();  
bool LoadSheet(int iIndex);  
CString GetSheetName(int iIndex);  
static void InitExcel();  
static void ReleaseExcel();  
int GetSheetCount();  
bool Open(CString FileName);  
ExcelFile();  
virtual ~ExcelFile();  
protected:  
private:  
static _Application m_ExcelApp;  
  
Workbooks    m_Books;   
_Workbook    m_Book;   
Worksheets   m_sheets;   
_Worksheet   m_sheet;   
Range        m_Rge;   
};  
.cpp文件:  
ExcelFile::ExcelFile()  
{  
}  
ExcelFile::~ExcelFile()  
{  
m_Rge.ReleaseDispatch();   
m_sheet.ReleaseDispatch();   
m_sheets.ReleaseDispatch();   
m_Book.ReleaseDispatch();   
m_Books.ReleaseDispatch();   
}  
void ExcelFile::InitExcel()  
{  
//创建Excel 2000服务器(启动Excel)   
if (!m_ExcelApp.CreateDispatch("Excel.Application",NULL))   
{   
AfxMessageBox("创建Excel服务失败!");   
exit(1);   
}   
}  
void ExcelFile::ReleaseExcel()  
{  
m_ExcelApp.ReleaseDispatch();  
}  
bool ExcelFile::Open(CString FileName)  
{  
//打开excel文件  
//利用模板文件建立新文档   
m_Books.AttachDispatch(m_ExcelApp.GetWorkbooks(),true);   
LPDISPATCH lpDis = NULL;  
lpDis = m_Books.Add(_variant_t(FileName)); // 如何判断文件是否打开?  
if (lpDis)  
{  
m_Book.AttachDispatch(lpDis);   
//得到Worksheets   
m_sheets.AttachDispatch(m_Book.GetWorksheets(),true);   
return true;  
}  
return false;  
}  
int ExcelFile::GetSheetCount()  
{  
return m_sheets.GetCount();  
}  
CString ExcelFile::GetSheetName(int iIndex)  
{  
_Worksheet sheet;  
sheet.AttachDispatch(m_sheets.GetItem(_variant_t((long)iIndex)),true);  
CString name = sheet.GetName();  
sheet.ReleaseDispatch();  
return name;  
}  
bool ExcelFile::LoadSheet(int iIndex)  
{  
LPDISPATCH lpDis = NULL;  
m_Rge.ReleaseDispatch();  
m_sheet.ReleaseDispatch();  
lpDis = m_sheets.GetItem(_variant_t((long)iIndex));  
if (lpDis)  
{  
        m_sheet.AttachDispatch(lpDis,true);  
        m_Rge.AttachDispatch(m_sheet.GetCells(), true);  
        return true;  
}  
return false;  
}  
int ExcelFile::GetColumnCount()  
{  
Range range;  
Range usedRange;  
usedRange.AttachDispatch(m_sheet.GetUsedRange(), true);  
range.AttachDispatch(usedRange.GetColumns(), true);  
int count = range.GetCount();  
usedRange.ReleaseDispatch();  
range.ReleaseDispatch();  
return count;  
}  
int ExcelFile::GetRowCount()  
{  
Range range;  
Range usedRange;  
usedRange.AttachDispatch(m_sheet.GetUsedRange(), true);  
range.AttachDispatch(usedRange.GetRows(), true);  
int count = range.GetCount();  
usedRange.ReleaseDispatch();  
range.ReleaseDispatch();  
return count;  
}  
CString ExcelFile::GetCell(int iRow, int iColumn)  
{  
Range range;  
range.AttachDispatch(m_Rge.GetItem (COleVariant((long)iRow),COleVariant((long)iColumn)).pdispVal, true);  
    COleVariant vResult =range.GetValue2();  
CString str;  
if(vResult.vt == VT_BSTR)       //字符串  
{  
str=vResult.bstrVal;  
}  
else if (vResult.vt==VT_INT)  
{  
        str.Format("%d",vResult.pintVal);  
}  
else if (vResult.vt==VT_R8)     //8字节的数字   
{  
str.Format("%f",vResult.dblVal);  
//str.Format("%.0f",vResult.dblVal);  
//str.Format("%1f",vResult.fltVal);  
}  
else if(vResult.vt==VT_DATE)    //时间格式  
{  
SYSTEMTIME st;  
VariantTimeToSystemTime(vResult.date, &st);  
}  
else if(vResult.vt==VT_EMPTY)   //单元格空的  
{  
    str="(NULL)";  
}   
range.ReleaseDispatch();  
return str;  
}  
int ExcelFile::GetCellInt(int iRow, int iColumn)  
{  
Range range;  
range.AttachDispatch(m_Rge.GetItem(COleVariant((long)iRow),COleVariant((long)iColumn)).pdispVal, true);  
COleVariant vResult =range.GetValue2();  
int num;  
num = (int)vResult.date;  
range.ReleaseDispatch();  
return num;  
}  
void ExcelFile::ShowInExcel(bool bShow)  
{  
m_ExcelApp.SetVisible(bShow);  
}  


喜欢 (0)
[开心洋葱]
分享 (0)
关于作者:
水墨上仙
……
加载中……