用编程实现Excel表格的九个基本操作

　　简介 

　　通过本文及配套示例源码你可以更加灵活的控制Excel表格文件，其中包括创建新Excel文件、写入表格数据、读取表格数据(包括对原建Excel文件自已手工添加的行、列数据的准确读取)，删除已有Excel表格，对表格中指定行、列、单元格进行查询、插入、替换等操作，同时还可以将生成的Excel文件转换为按指定分隔符分隔的其它文本格式的文件。下面是把此方法用VC6编写的示例程序运行效果：

 

　　基本思路

　　通过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中总行数、总列数、当前行

　　intiCols=SS.GetTotalColumns();//总列数

　　intiRows=SS.GetTotalRows();//总行数

　　intiCurRow=SS.GetCurrentRow();//当前所在行号

 

　　九、获取行头数据

　　CStringArrayrowHeader;

　　SS.GetFieldNames(rowHeader);

　　CStringtmpStr;

　　for(inti=0;i<rowHeader.GetSize();i++)

　　{

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

　　tempString+=tmpStr;

　　}

　　AfxMessageBox(tempString);