如何用C语言实现读取excel文件中的数据呢？

基本思路

基础实现方法同上篇文章《直接通过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 = 0i <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 = 1i <= SS.GetTotalRows()i++)

{

// 读取一行

SS.ReadRow(Rows, i)

CString strContents = ""

for (int j = 1j <= 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 = 1k <= 2k++)

{

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 = 0i <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 = 0i <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 = 0i <rowHeader.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", 1, i+1, rowHeader.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

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

这是第二次了，市场部那边又来要求改数据。他们要改的是数据库某张表中类似商品价格等的数据，需要改的地方又多，我们上次是靠新来的兄弟一个个给Update进去的，这次老大去教了他们Update语句，把烦人的皮球踢给他们了。但这样一个个更新很明显不是办法，我想通过excel直接把数据导入数据库应该是可行的吧，就开始找方法了。

我想至少有这样两种比较容易实现的方法：

1、直接用Sql语句查询

2、先用excle中的数据生成xml文件，再把xml导入数据库

第一种方法（方法二以后再试），找到联机丛书里实现此功能的Sql语句如下：

SELECT* FROMOpenDataSource（'Microsoft.Jet.OLEDB.4.0', 'DataSource="c:Financeaccount.xls"UserID=AdminPassword=Extendedproperties=Excel5.0'）…xactions

语句是有了，但我还是试了很久，因为各个参数具体该怎么设置它没有说。Data Source就是excel文件的路径，这个简单；UserId、Password和Extended properties这三个属性我改成了各种各样的与本机有关的用户名、密码以及excel版本都不对，最后用上面例子里的值“User ID=AdminPassword=Extended properties=Excel 5.0”才成功了，晕啊；最后个“xactions”更是查了很多资料，其实就仅仅是excel文件里所选的工作表名而已，怪我对excel不够熟悉了，另外注意默认的Sheet1要写成[Sheet1$]

最后，看看我成功的测试

数据库里建好一个表testTable_1，有5个字段id, name, date, money, content，C盘下book1.xls文件的sheet1工作表里写好对应的数据并设好数据类型，执行如下插入语句：

insertintotestTable_1（[name],[date],[money],[content]） Select[姓名],[日期],[金额],[内容] FROMOpenDataSource（'Microsoft.Jet.OLEDB.4.0', 'DataSource="C:Book1.xls"UserID=AdminPassword=Extendedproperties=Excel5.0'）…[Sheet1$]

select里的列名我一开始用*代替，但发现输出顺序与我预期的不同，是“金额、内容、日期、姓名”，不知道具体有什么规律，就老老实实写名字了。 *** 作成功

回过头来看看市场部的要求，假设在我这张表里实现，可以先判断如excel里存在与记录相同的name字段（name要唯一非空）时就删除记录，之后再插入，这样简单，但自增的id字段会因为插入而改变，那是不行的了。可行的方法是先读出excel里全部记录，然后用游标一条条分析，如果存在这个name就更新否则就插入。OK，下次就不用让他们再对着文档一条条Update了

---