简介
通过本文及配套示例源码你可以更加灵活的控制Excel表格文件，其中包括创建新Excel文件、写入表格数据、读取表格数据(包括对原建Excel文件自已手工添加的行、列数据的准确读取)，删除已有Excel表格，对表格中指定行、列、单元格进行查询、插入、替换等操作，同时还可以将生成的Excel文件转换为按指定分隔符分隔的其它文本格式的文件。下面是把此方法用VC6编写的示例程序运行效果：
基本思路
基础实现方法同上篇文章《直接通过ODBC读、写Excel表格文件》相同，都是通过ODBC来把Excel表格文件当成数据库文件来进行读、写等操作，所以在Excel表格文件中写入的行头名必须是唯一的(不要重名，相当于数据库中的ID值)。本文中对Excel文件的操作都被封装进一个类CSpreadSheet中，通过它我们可以非常简便的实现各种Excel表格数据操作，并且可以对该类进行扩充来满足自己的需求。
具体实现
一、 包含Excel文件操作类头文件
#include "CSpreadSheet.h"
二、 新建Excel文件，并写入默认数据 // 新建Excel文件名及路径，TestSheet为内部表名
CSpreadSheet SS("c:\\Test.xls", "TestSheet");
CStringArray sampleArray, testRow;
SS.BeginTransaction();
// 加入标题
sampleArray.RemoveAll();
sampleArray.Add("姓名");
sampleArray.Add("年龄");
SS.AddHeaders(sampleArray);
// 加入数据
CString strName[] = {"徐景周","徐志慧","郭徽","牛英俊","朱小鹏"};
CString strAge[]  = {"27","23","28","27","26"};
for(int i = 0; i < sizeof(strName)/sizeof(CString); i++)
{
sampleArray.RemoveAll();
sampleArray.Add(strName[i]);
sampleArray.Add(strAge[i]);
SS.AddRow(sampleArray);
}
SS.Commit();
三、 读取Excel文件数据 CSpreadSheet SS("c:\\Test.xls", "TestSheet");
CStringArray Rows, Column;
//清空列表框
m_AccessList.ResetContent();
for (int i = 1; i <= SS.GetTotalRows(); i++)
{
// 读取一行
SS.ReadRow(Rows, i);
CString strContents = "";
for (int j = 1; j <= Rows.GetSize(); j++)
{
if(j == 1)
strContents = Rows.GetAt(j-1);
else
strContents = strContents +  " --> " + Rows.GetAt(j-1);
}
m_AccessList.AddString(strContents);
}
四、 对已存在Excel表格数据进行添加、插入、替换操作 // 初始化测试行数据，进行添加、插入及替换数据操作演示
for (int k = 1; k <= 2; k++)
{
testRow.Add("Test");
}
SS.AddRow(testRow);  // 添加到尾部
SS.AddRow(testRow, 2);  // 插入新行到第二行
SS.AddRow(testRow, 6, true); // 替换原第四行来新的内容
SS.AddCell("徐景周", 1,2);    // 添加(不存在)或替换(存在)第二行，第一列单元格内容
SS.Commit();
五、 对已存在Excel表格数据进行行、列、单元格查询void CExcelAccessDlg::OnQuery()
{
CSpreadSheet SS("c:\\Test.xls", "TestSheet");
CStringA
rray Rows, Column;
CString tempString = "";
UpdateData();
if(m_strRow == "" && m_strColumn == "")        // 查询为空
{
AfxMessageBox("行号、列号不能同时为空!");
return;
}   
else if(m_strRow == "" && m_strColumn != "")    // 查询指定列数据
{
int iColumn = atoi(m_strColumn);
int iCols = SS.GetTotalColumns();
if(iColumn > iCols) // 超出表范围查询时
{
CString str;
str.Format("表中总列数为: %d, ", iCols);
AfxMessageBox(str + " 查询列数大于Excel表中总列数，请重新输入!");
return;
}
// 读取一列数据，并按行读出
if(!SS.ReadColumn(Column, iColumn))
{
AfxMessageBox(SS.GetLastError());
return;
}
CString tmpStr;
for (int i = 0; i < Column.GetSize(); i++)
{
tmpStr.Format("行号: %d, 列号: %d ，内容: %s\n", i+1,iColumn,Column.GetAt(i));
tempString += tmpStr;
}
AfxMessageBox(tempString);
}
else if(m_strRow != "" && m_strColumn == "")    // 查询指定行数数据
{
int iRow = atoi(m_strRow);
int iRows = SS.GetTotalRows();
if(iRow > iRows) // 超出表范围查询时
{
CString str;
str.Format("表中总行数为: %d, ", iRows);
AfxMessageBox(str + " 查询行数大于Excel表中总行数，请重新输入!");
return;
}
// 读取指定行数据
if(!SS.ReadRow(Rows, iRow))
{
AfxMessageBox(SS.GetLastError());
return;
}
CString tmpStr;
for (int i = 0; i < Rows.GetSize(); i++)
{
tmpStr.Format("行号: %d, 列号: %d ，内容: %s\n", iRow, i+1, Rows.GetAt(i));
tempString += tmpStr;
}
AfxMessageBox(tempString);
}
else if(m_strRow != "" && m_strColumn != "")    // 查询指定单元格数据
{
int iRow = atoi(m_strRow), iColumn = atoi(m_strColumn);
int iRows = SS.GetTotalRows(), iCols = SS.GetTotalColumns();
if(iColumn > iCols)            // 超出表范围查询时
{
CString str;
str.Format("表中总列数为: %d, ", iCols);
AfxMessageBox(str + " 查询列数大于Excel表中总列数，请重新输入!");
return;
}
else if(iRow > iRows)
{
CString str;
str.Format("表中总行数为: %d, ", iRows);
AfxMessageBox(str + " 查询行数大于Excel表中总行数，请重新输入!");
return;
}
// 读取指定行、列单元格数据
if(!SS.ReadCell(tempString, iColumn, iRow))
{
AfxMessageBox(SS.GetLastError());
return;
}
CString str;
str.Format("行号: %d, 列号: %d ，内容: %s", iRow,iColumn,tempString);
AfxMessageBox(str);
}
}
六、 将存在的Excel转换另存为指定分隔的文本文件 // 将原Excel文件转换为用分号分隔的文本，并另存为同名文本文件
SS.Convert(";");
七、 删除Excel中表格 SS. DeleteSheet();            // 删除Excel文件中所有表格
SS. DeleteSheet(" TestSheet ");  // 删除Excel中TextSheet表格
八、 获取Excel中总行数、总
列数、当前行 int iCols = SS.GetTotalColumns();  // 总列数
int iRows = SS.GetTotalRows();    // 总行数
int iCurRow = SS.GetCurrentRow(); // 当前所在行号
九、 获取行头数据 CStringArray rowHeader;
SS.GetFieldNames(rowHeader);
CString tmpStr;
for (int i = 0; i < rowHeader.GetSize(); i++)
{
tmpStr.Format("行号: %d, 列号: %d ，内容: %s\n", 1, i+1, rowHeader.GetAt(i));
tempString += tmpStr;
}
AfxMessageBox(tempString);
最后，如果想知道详细实现细节的话，可以在下载示例源码后，仔细查看源码既可(内有详细注释)。
///////com方式
操作系统是Microsoft XP，办公套装是Microsoft Office 2003，编程环境是Microsoft Visual Studio 6.0，一切都是Microsoft。
我最近要将数据库中的内容查询 出来放到excel表格以便打印，所以上网了这 方面的内容，这里主要是抛砖引玉。
从思路上来看，操作excel表格就是将其打开，然后写入/读出数据，然后关闭。
首先创建一个程序（我的例子是 一个MFC的单文档程序），在程序的入口处和出口处先作这样两个步骤来支持COM库：
在程序入口处CXXXApp:: InitInstance()函数AfxEnableControlContainer()；语句之后加入下面几行：
if (CoInitialize(NULL) != 0)
{
AfxMessageBox(“初始化COM支持库失败!”);
exit(1);
}
假如这个条件不通过就不能运行 起程序。
在程序的出口处CXXXApp:: ExitInstance()函数return语句之前加入下面这句话：CoUninitialize()；来释放COM支持库。
这样对COM支持库的代码已经完成。
下面要从Office的安装目录中到对VC操作excel文件的动态库，在某些版本下这个文件是Excel8.olb或者Excel9.olb，在我的版本中是这个exe也是动态库的形式，是微软公司主要的文件结果之一。选择vc的View菜单里面的ClassWizad命令，会弹出一个对话框；然后点击Add Class…按钮选择From a type library，会弹出一个打开对话框，从这里打开Office安装目录下…\Office11\EXCEL.EXE文件，从里面选择几个要用到的类：_Application, Workbooks, _Wrokbook, Worksheets, _WorkSheet, Range，点
击OK按钮。会在程序中生成一个excel.h和excel.cpp文件，这些文件中包含了刚才我们选择的几个类的代码。下面介绍一下这几个类：
在vc操纵excel的exe动态库里面有好多个对象模型，就是刚才在创建过程中看到的那个列表，但是经常用到的有这么几个：_Application, Workbooks, _Wrokbook, Worksheets, _WorkSheet, Range，Charts和_Chart，最后面的两个是用来操作图表的，我没有用到所以这里也就不记录了。
_Application：这里的Application就是Excel本身，众所周知，一个Excel可以包含多个工作簿，每个工作簿又可以包含多个工作表，而每个工作表又可以包含多个区域或者图表，所 以这
里他们是树型的结构关系，而application最基本 的一个功能就是到它的子项工作簿。果然，我们在引入我们程序的Application类中看到了这样的成员函数：GetWorkbooks()。既然application就是excel，那么打开程序，退出程序，显示/隐藏程序这些基本的操作都可以在这个类的成员函数中到，果不其然。
Workbooks： 这个对象是一个容器对象，它里面存放着所有打开的工作簿。因此，我们可以猜测它一定有添加，查，打开/关闭工作簿的功能。（本程序中使用excel的一个xlt模板来生成一个xls文件就是使用了这个容器对象的添加功能。）
_Workbook： 这是一个工作簿，也就相当于一个xls文件。Excel可以同时打开多个工作簿，所以工作簿之间必定能够互相切换，每个工作簿可以关联工作表容器并获得工 作表的索引。
Worksheets： 也是一个容器对象，和Workbooks类似。
_Worksheet： 这个就是我们看到的工作表，比如Sheet1，sheet2等等。
Rang：就是我们 看到的能选中的方框的大小。而我们所要作的操作基本上是以区域为单位进行的。
介绍完这些，就添加一个菜单， 来响应操作excel的命令。
然后下面附带这个函数的内容， 注释还算可以吧，并且附上网上不知道谁写的但是转载极多的一个封装类。
view plaincopy to clipboardprint?
_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"))); 
cstring转为int//得到全部的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(); 
_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.A
ttachDispatch(_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();

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。