发布新日志

  • 针对Excel表格文件操作的编程实现【转】

    2008-11-04 18:23:11


    简介
    通过本文及配套示例源码你可以更加灵活的控制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转换另存为指定分隔的文本文件
    // 将原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);

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

    参考文献:
    直接通过ODBC读、写Excel表格文件 – 徐景周(译)
    A Class to Read and Write to Excel and Text Delimited Spreadsheet – Yap Chun Wei

Open Toolbar