2. 程式人生 > >C++使用VS2010匯出Excel的方法及步驟

C++使用VS2010匯出Excel的方法及步驟

阿新 • • 發佈：2019-01-24

 最近工作需要將listctrl中的資料匯出到Excel中。網上找了很多，但多數是VC6.0的。結合VC6.0匯出的方法，自己琢磨了不少時間，終於將問題解決了。輕鬆之餘，將過程分享出來，希望對需要的人有所幫助。 

 一、設定

環境：

Windows7

Microsoft Visual Studio 2010

Microsoft Office Excel 2003

 說明：用的公司的電腦，作業系統和軟體都是正版的。

1、新建C++工程

新建自己的C++工程。

2、新增Excel類庫

在工程名上右鍵，選擇Add---Class，選擇MFC Class From TypeLib，如圖：

 

然後新增如圖的幾個類。

 

3、修改標頭檔案

進入剛新增進來的幾個類標頭檔案中將#import開頭的這句注掉

 

4、修改提示的錯誤

將修改過的工程編譯一下，出現如下錯誤：

 

雙擊提示，在DialogBox（）前加下劃線，如圖：

 

5、新增標頭檔案

在使用匯出功能的檔案中新增標頭檔案：


6、使用Excel類庫提供的函式將需要匯出的資料匯出為.xls檔案

經過以上幾步，現在可以使用Excel類庫提供的函式匯出資料了。

與網上許多文章相對比一下，匯出流程一樣。只不過類庫函式有所改變。函式名由Get改為get_,Set改為put_。

 二、匯出

附錄一：       匯出Excel格式的簡單流程

CFileDialog dlg(FALSE,_T("(*.xls)"),NULL,OFN_HIDEREADONLY |OFN_OVERWRITEPROMPT, 
_T("(*.xls)|*.xls||"),NULL);


if (dlg.DoModal() == IDOK)
{
//獲取路徑
CString strFileName=dlg.GetPathName();

         COleVariant

              covTrue((short)TRUE),

              covFalse((short)FALSE),

              covOptional((long)DISP_E_PARAMNOTFOUND,   VT_ERROR);

       CApplication0 app;

       CWorkbook0 book;

       CWorkbooks0 books;

       CWorksheet0 sheet;

       CWorksheets0 sheets;

       CRange0 range;

       CFont1 font;

       if (!app.CreateDispatch(_T("Excel.Application")))

       {

              MessageBox(_T("Error!"));

       }

       books = app.get_Workbooks();

       book = books.Add(covOptional);

       sheets = book.get_Worksheets();

       sheet = sheets.get_Item(COleVariant((short)1));

       range   =   sheet.get_Range(COleVariant(_T("A1")),COleVariant(_T("A1")));

       range.put_Value2(COleVariant(_T("hanhan")));

       book.SaveCopyAs(COleVariant(strFileName));

       book.put_Saved(true);

       book.ReleaseDispatch();  

       books.ReleaseDispatch();  

       app.Quit();

       app.ReleaseDispatch();

}

附錄二：將ListCtrl中的資料匯出為Excel格式

       CString strFile = _T("E:\\Test.xls");

         COleVariant

                   covTrue((short)TRUE),

                   covFalse((short)FALSE),

                   covOptional((long)DISP_E_PARAMNOTFOUND,   VT_ERROR);

         CApplication   app;

         CWorkbooks   books;

         CWorkbook   book;

         CWorksheets   sheets;

         CWorksheet   sheet;

         CRange   range;

         CFont0   font;

         if (!app.CreateDispatch(_T("Excel.Application")))

         {

                   MessageBox(_T("建立失敗！"));

                   return;

         }

         //Get   a   new   workbook.

         books = app.get_Workbooks();

         book = books.Add(covOptional);

         sheets = book.get_Worksheets();

         sheet = sheets.get_Item(COleVariant((short)1));

         ////////////////////////////////////CListCtrl控制元件report風格//////////////////////////////////////////////////////////

         CHeaderCtrl   *pmyHeaderCtrl;

         pmyHeaderCtrl = m_clcData.GetHeaderCtrl();//此句取得CListCtrl控制元件的列表頭

         int   iRow,iCol;

         int   m_cols   =   pmyHeaderCtrl-> GetItemCount();

         int   m_rows = m_clcData.GetItemCount();

         HDITEM   hdi;

         TCHAR     lpBuffer[256];

         bool       fFound   =   false;

         hdi.mask   =   HDI_TEXT;

         hdi.pszText   =   lpBuffer;

         hdi.cchTextMax   =   256;

         CString   colname;

         CString strTemp;

         for(iCol=0;   iCol <m_cols;   iCol++)//將列表的標題頭寫入EXCEL

         {

                   GetCellName(1 ,iCol + 1, colname);

                   range   =   sheet.get_Range(COleVariant(colname),COleVariant(colname));

                   pmyHeaderCtrl-> GetItem(iCol,   &hdi);

                   range.put_Value2(COleVariant(hdi.pszText));

                   int   nWidth   =   m_clcData.GetColumnWidth(iCol)/6;

                   //得到第iCol+1列  

                   range.AttachDispatch(range.get_Item(_variant_t((long)(iCol+1)),vtMissing).pdispVal,true);  

                   //設定列寬 

                   range.put_ColumnWidth(_variant_t((long)nWidth));

         }

         range   =   sheet.get_Range(COleVariant( _T("A1 ")),   COleVariant(colname));

         range.put_RowHeight(_variant_t((long)50));//設定行的高度

         font = range.get_Font();

         font.put_Bold(covTrue);

         range.put_VerticalAlignment(COleVariant((short)-4108));//xlVAlignCenter   =   -4108

         COleSafeArray   saRet;

         DWORD   numElements[]={m_rows,m_cols};       //5x2   element   array

         saRet.Create(VT_BSTR,   2,   numElements);

         range   =   sheet.get_Range(COleVariant( _T("A2 ")),covOptional);

         range = range.get_Resize(COleVariant((short)m_rows),COleVariant((short)m_cols));

         long   index[2];

         range   =   sheet.get_Range(COleVariant( _T("A2 ")),covOptional);

         range   =   range.get_Resize(COleVariant((short)m_rows),COleVariant((short)m_cols));

         for   (   iRow   =   1;   iRow   <=   m_rows;   iRow++)//將列表內容寫入EXCEL

         {

                   for   (   iCol   =   1;   iCol   <=   m_cols;   iCol++)  

                   {

                            index[0]=iRow-1;

                            index[1]=iCol-1;

                            CString   szTemp;

                            szTemp=m_clcData.GetItemText(iRow-1,iCol-1);

                            BSTR   bstr   =   szTemp.AllocSysString();

                            saRet.PutElement(index,bstr);

                            SysFreeString(bstr);

                   }

         }

         range.put_Value2(COleVariant(saRet));

//       Cnterior cellinterior;

//       range   =   sheet.get_Range(COleVariant( _T("A1 ")),covOptional);

//       range   =   range.get_Resize(COleVariant((short)1),COleVariant((short)m_cols));

//       books = range.get_Interior();

//       cellinterior.AttachDispatch(books);

//       cellinterior.put_ColorIndex(COleVariant((short)37));//設定EXCEL頭一行的背景顏色

//       for(   iRow=1;   iRow   <=   m_rows;   iRow++)//設定EXCEL其餘的背景顏色（顏色交替變換）

//       {

//                 int   state=iRow%2;

//                 CString   index;

//                 index.Format( _T("A%d "),iRow+1);

//                 range   =   sheet.get_Range(COleVariant(index),covOptional);

//                 range   =   range.get_Resize(COleVariant((short)1),COleVariant((short)m_cols));

//                 books=range.get_Interior();

//                 cellinterior.AttachDispatch(books);

//                 if(!state)

//                          cellinterior.put_ColorIndex(COleVariant((short)36));

//                 else

//                          cellinterior.put_ColorIndex(COleVariant((short)24));

//       }

         saRet.Detach();

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////

         book.SaveCopyAs(COleVariant(strFile));

//       cellinterior.ReleaseDispatch();

         book.put_Saved(true);

         book.ReleaseDispatch();  

         books.ReleaseDispatch();  

         app.Quit();

         app.ReleaseDispatch();

由於不需要，Excel單元格樣式及顏色等屬性設定沒有做，有興趣的可以自己去試試。程式碼中設定的有錯。

自己寫的一個獲取單元頭的函式：

void   GetCellName(int nRow, int nCol, CString &strName)

{

         int nSeed = nCol;

         CString strRow;

         char cCell = 'A' + nCol - 1;

         strName.Format(_T("%c"), cCell);

         strRow.Format(_T( "%d "), nRow);

         strName += strRow;

}

三、匯入

HRESULT hr; 
hr = CoInitialize(NULL); 
if(FAILED(hr)) 
{ 
AfxMessageBox(_T("Failed to call Coinitialize()" )); 
}



CFileDialog  filedlg(TRUE,L"*.xls",NULL,OFN_HIDEREADONLY|OFN_OVERWRITEPROMPT,L"Xls檔案 (*.xls)|*.xls");  
filedlg.m_ofn.lpstrTitle=L"開啟檔案";
CString strFilePath;
if (IDOK==filedlg.DoModal())
{
strFilePath=filedlg.GetPathName();
} 
else
{
return;
}


//////////////////////////////////////////////////////////////////////////
CApplication app;
CWorkbook book;
CWorkbooks books;
CWorksheet sheet;
CWorksheets sheets;
CRange range;
LPDISPATCH lpDisp;
//定義變數
COleVariant covOptional((long)
DISP_E_PARAMNOTFOUND,VT_ERROR);
if (!app.CreateDispatch(_T("Excel.Application"),NULL))
{
this->MessageBox(_T("無法建立Excel應用"));
return;
}
books = app.get_Workbooks();
//開啟Excel，其中pathname為Excel表的路徑名
lpDisp = books.Open(strFilePath,covOptional
,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional
,covOptional,covOptional,covOptional
,covOptional,covOptional,covOptional
,covOptional);
book.AttachDispatch(lpDisp);
sheets = book.get_Worksheets();
sheet = sheets.get_Item(COleVariant((short)1));


//app.put_Visible(TRUE); //表格可見
//app.put_UserControl(FALSE); 


////獲得座標為（A，1）的單元格
/*range = sheet.get_Range(COleVariant(_T("A1"))
,COleVariant(_T("A1")));*/
////獲得單元格的內容
//COleVariant rValue;rValue = 
//COleVariant(range.get_Value2());
////轉換成寬字元
//rValue.ChangeType(VT_BSTR);
////轉換格式，並輸出
//this->MessageBox(CString(rValue.bstrVal));


/*讀取Excel表中的多個單元格的值，在listctrl中顯示*/


COleVariant vResult;
//讀取已經使用區域的資訊，包括已經使用的行數、列數、起始行、起始列
range.AttachDispatch(sheet.get_UsedRange());
range.AttachDispatch(range.get_Rows());
//取得已經使用的行數
long iRowNum = range.get_Count();         
range.AttachDispatch(range.get_Columns());
//取得已經使用的列數
long iColNum = range.get_Count();         
//取得已使用區域的起始行，從1開始
long iStartRow = range.get_Row();
//取得已使用區域的起始列，從1開始
long iStartCol = range.get_Column();


for(int i=iStartRow;i<=iRowNum;i++)
{
/*CString strRowName = _T("");
strRowName.Format(_T("%d"), i);
m_ListCtrl.InsertItem(i-1, strRowName);*/
for(int j=iStartCol;j<=iColNum;j++)
{
//讀取單元格的值
range.AttachDispatch(sheet.get_Cells());
range.AttachDispatch(range.get_Item(COleVariant((long)i),
COleVariant((long)j)).pdispVal);
vResult = range.get_Value2();
CString str,stry,strm,strd;
SYSTEMTIME st;
if(vResult.vt == VT_BSTR)     //若是字串
{
str = vResult.bstrVal;
}
else if (vResult.vt == VT_R8) //8位元組的數字
{
str.Format(L"%f",vResult.dblVal);
}
else if(vResult.vt == VT_DATE) //時間格式
{
VariantTimeToSystemTime(vResult.date, &st);
stry.Format(L"%d",st.wYear);
strm.Format(L"%d",st.wMonth);
strd.Format(L"%d",st.wDay);
str = stry+L"-"+strm+L"-"+strd;
}
else if(vResult.vt == VT_EMPTY) //單元為空
{
str=L"";
}
else if (vResult.vt ==VT_I4)
{
str.Format(_T("%ld"), (int)vResult.lVal);
}


//m_ListCtrl.SetItemText(i-1, j, str);
}
}

/*釋放資源*/
range.ReleaseDispatch();
sheet.ReleaseDispatch();
sheets.ReleaseDispatch();
book.ReleaseDispatch();
books.ReleaseDispatch();
app.Quit();
app.ReleaseDispatch();

相關推薦

C++使用VS2010匯出Excel的方法及步驟

 最近工作需要將listctrl中的資料匯出到Excel中。網上找了很多，但多數是VC6.0的。結合VC6.0匯出的方法，自己琢磨了不少時間，終於將問題解決了。輕鬆之餘，將過程分享出來，希望對需要的人有所幫助。   一、設定 環境： Windows7 Microsoft Visual Studi

C#也能動態生成Word文件並填充資料, 匯出EXCEL 方法

        public string CreateWordFile(string CheckedInfo)         ...{             string message = "";             try             ...{                 Ob

Oracle10g物理DG詳細配置方法及步驟

scope 建數據庫 rap hive proto select oracl -s duplicate --測試環境： OS：Redhat linux(64) Primary： IP：192.168.94.198 SID：dgdb1 Hostn

搭建gre ‘V P N‘的方法及步驟

tunnel linux for lsmod 3.2 one dev 系統 查看 虛擬私有網絡(V P N)服務器 **v p n服務器也叫做虛擬的私有網絡，它是建立在公網的基礎上開辟出一條隧道，用於兩主機之間的通訊** **v p n常用於集團公司中，集團下的各個子公

異地VCS雙機全同步方法及步驟詳解

  異地雙機容災常見命令 命令 含義 vxdctl -c mode 找到mater節點 vradmin -l printrvg 檢視節點是否是pr

HP-UX對/tmp目錄擴容的方法及步驟

很多叢集，或服務等都需要/tmp空間有一定空間，比如說安裝oracle資料庫，就需要/tmp空間至少1G，少於1G自檢就通不過。要擴大/tmp，首先要找到這個系統所對應的邏輯卷，只有首先擴大邏輯卷，給檔案系統以擴大的空間，才能擴大檔案系統。 步驟一: 檢視vg空間，檢視free的空間 #

c#/.net 匯出excel表格

1.本片主要講述excel匯出的樣式處理，匯出方法看前一篇 static void Main(string[] args) { List<ExportModel> list = new List<ExportModel>(); string[] types = new string

公共POI匯出Excel方法--java

公共POI匯出Excel方法–java 最近做了一些資料Excel匯出的功能，先是看了很多部落格，然後發現都沒有公用的方法，但是又發現好像每一次匯出都需要寫一些差不多類似的程式碼，後來找到一篇公共匯出Excel的方法，https://www.cnblogs.c

C#實現匯出Excel模板

/// <summary> /// 匯出模板 /// </summary> /// <returns></returns> [Action]

[FPGA][DE0] Qsys 加入 FLASH 記憶體 方法及步驟

 如何在DE0中設定Qsys加入4MB Flash設定步驟: 步驟1. 先在Qsys中加入Generic Tri-State Controller。其設定如圖1及圖2所示。                 &nb

C#，匯出Excel時，第一個為0時不顯示，

只需在前面加上單引號 " ' "可，如下 dcv[2] ="'" +drBH["BH_CHDZ"].ToString(); ;//補貨倉 詳細程式碼如下： private void Report_BHD_Excel_MB()//轉Excel模板;         {

android cts測試方法及步驟

7.0的cts測試命令 run cts –m CtsAppTestCases –t android.app.cts.ActionBarTest#testAddTab --skip-preconditions 1.CTS下載 開啟下面網址， http://source.a

C# datagridview匯出excel

 #region 匯出excel       public static void ExportDataGridViewToExcel(DataGridView dataGridview1)       {           SaveFileDialog saveFileDialog = new SaveF

asp.net mvc 資料匯出excel表及自excel表匯入資料到相應表

一、自資料表匯出excel /// <summary> /// 匯出excel /// </summary> /// <param name="sortgid"></param>

Dubbo介面測試方法及步驟

1）開啟soapUI，點選File--New project； 2）右鍵New REST service from URL，注：因為dubbo介面不像http介面一樣有URL，所以這裡的URL可以隨便寫，只是個標記 3

C#DATAGRIDVIEW 匯出EXCEL

首先需要引入程式集：Microsoft.Office.Interop.Excel  （如果沒有引用過的需要右鍵新增引用再搜尋就行了）實現的方法：123456789101112131415161718192021222324252627282930313233343536373

C# DataGridView匯出Excel，設定單元格合併，隱藏行

不得不承認，做程式需要研究。 DataGridView匯出Excel的原始碼 using System.Windows.Forms;using System.Collections.Generic;using System;using Microsoft.Office.In

.Net MVC 匯入匯出Excel總結(三種匯出Excel方法，一種匯入Excel方法)

public class ExcelController : Controller { // // GET: /Excel/ Models.zbwxglEntities myMdl = new Models.zbwxglEntities();

php匯出excel方法

方法一： //直接用頭部資訊輸出excel格式檔案，內容以表格形式展示。 $filename='orderexcel'; header("Content-type: application/vnd.ms-excel; charset=gbk"); head

LVM 邏輯卷擴容方法及步驟

根據LVM-HOWTO整理了一下邏輯卷的擴容方法，以免將來忘記。 假設VG名為VolGroup01，LV名為lv_data，新增的磁碟為/dev/sdb 1. 使用fdisk建立一個Id為8e （Linux LVM）的分割槽 fdisk /dev/sdb   n （新建分