分享
 
 
 

针对Excel表格文件操作的编程实现

王朝vc·作者佚名  2006-01-08
窄屏简体版  字體: |||超大  

针对Excel表格文件操作的编程实现

编译:徐景周

下载示例源码(http://www.vchelp.net/itbookreview/view_paper.asp?paper_id=770)

简介

通过本文及配套示例源码你可以更加灵活的控制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");

CStringArray 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转换另存为指定分隔的文本文件

SS.Convert(";"); // 将原Excel文件转换为用分号分隔的文本,并另存为同名文本文件

七、删除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);

最后,如果想知道详细实现细节的话,可以在下载示例源码后,仔细查看源码既可(内有详细注释)。

参考文献:

直接通过ODBC读、写Excel表格文件 – 徐景周(译)

A Class to Read and Write to Excel and Text Delimited Spreadsheet – Yap Chun Wei

联系方式:

地址:陕西省西安市劳动路2号院六单元

邮编:710082

EMAIL:jingzhou_xu@163.net

未来工作室(Future Studio)

[url=http://www.vckbase.com/vckbase/columnist/jingzhouxu/default.asp][/url]

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有