在開發軟件時，經常要將數據輸出到Excel 2000中，在Excel 2000中對該數據進行進一步地格式化處理或進行計算處理。在Visual Basic中處理起來較簡單，Excel 2000的VB編程幫助中有較為詳細的介紹。在Visual C++中如何進行處理了？利用Excel 2000的ActiveX Automate功能，處理起來同VB中類似。但要注意以下幾點：
| 對于對象的屬性值的讀取或賦值，需要用GetProperty()或SetProperty(NewValue)函數，不能象VB中直接通過屬性名稱取值或賦值。例如：Worksheet.GetCount(), Worksheet.SetName(“Sheet1”)。 |
| 對集合對象中的成員對象的引用，必須使用集合對象的GetItem()函數。例如：Worksheets.GetItem(ColeVariant((long)1))或Worksheets.GetItem(ColeVariant(“Sheet1”))取得第一個工作表。 |
| 在COM接口中，時常用到Variant，BSTR，SafeArray數據類型。Variant數據類型是一個聯合，可表示幾乎所有的類型的數據，具體用法見MSDN中的相關介紹，類_variant_t是對VARIANT數據類型的封裝。在Excel 2000的VB編程幫助中，如果提到某函數或屬性需要一個值，該值的數據類型通常是Variant，在封裝Excel 2000對象的類定義中，說明了具體需要的數據類型。BSTR是一個包括了字符串和字符串長度的數據結構，類_bstr_t是對BSTR數據類型的封裝。在Excel 2000的VB編程幫助中提到的字符串通常指BSTR。具體函數參數或屬性的數據類型，見封裝該對象的類的定義。SafeArray是一個包括數組和數組邊界的結構，數組邊界外的內容不允許訪問。在Excel 2000的VB編程幫助中提到的數組是指SafeArray。關于SafeArray的處理，請見MSDN的相關幫助。 |
| 對于缺省參數和缺省值。在VB中，函數的參數可以空缺，在VC++中不允許，必須將所有的參數填寫完全。如果你希望指定某個參數為缺省值，根據參數數據類型的不同，可指定不同的缺省值。當參數數據類型為字符串時，可以用長度為0的字符串。如果參數是Variant類型，可用常量vtMissing，該常量在comdef.h中定義。也可用_variant_t(DISP_E_PARAMNOTFOUND, VT_ERROR)產生一個Variant對象。 |
| Excel對象中的集合對象有時包括的子對象是不一定的，例如：Range對象，可以表示Cell的集合，也可以表示Column的集合或Row的集合，Range.GetItem(1)可以返回Cell或Column或Row對象。 |
| 對對象的引用或傳遞對象，使用IDispatch類對象，有時利用Variant對IDispatch進行包裝。 |
| 以下是一段源程序，演示如何啟動Excel 2000，利用一個模板文件產生一個新文檔，在該文檔的”Sheet1”工作表的第一個單元中填寫一段文字，設置第一列的列寬，然后調用一個模板中的宏，執行一段程序，最后打印預覽該Excel文檔。模板文件名稱：MyTemplate.xlt。程序在Visual C++ 6.0 sp4，Windows 2000 Professional sp-1下調試通過。 |
| 首先利用Visual C++ 6.0，建立一個MFC基于對話框的工程項目，共享DLL，Win32平臺。工程名稱ExcelTest。在主對話框中加入一個按鈕， |
| 雙擊該按鈕，增加成員函數void CExcelTestDlg::OnExceltest()。 |
| 在BOOL CExcelTestApp::InitInstance()中，dlg.DoModal();之前增加代碼： |
| if (CoInitialize(NULL)!=0) |
| AfxMessageBox("初始化COM支持庫失敗!"); |
| 選擇Menu->View->ClassWizade，打開ClassWizade窗口，選擇Add Class->From a type library，選擇D:\Program Files\Microsoft Office\office\Excel9.OLB(D:\Program Files\Microsoft Office\是本機上Microsoft Office 2000的安裝目錄，可根據個人機器上的實際安裝目錄修改)。選擇_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range，加入新類，分別為_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range，頭文件Excel9.h，源文件Excel9.cpp。 |
| 在ExcelTestDlg.cpp文件的頭部，#include "ExcelTestDlg.h"語句之下，增加 ： |
| 在void CExcelTestDlg::OnExceltest() 函數中增加如下代碼： |
| void CExcelTestDlg::OnExceltest() |
| //創建Excel 2000服務器(啟動Excel) |
| if (!ExcelApp.CreateDispatch("Excel.Application",NULL)) |
| AfxMessageBox("創建Excel服務失敗!"); |
| wbsMyBooks.AttachDispatch(ExcelApp.GetWorkbooks(),true); |
| wbMyBook.AttachDispatch(wbsMyBooks.Add(_variant_t("g:\\exceltest\\MyTemplate.xlt"))); |
| wssMysheets.AttachDispatch(wbMyBook.GetWorksheets(),true); |
| wsMysheet.AttachDispatch(wssMysheets.GetItem(_variant_t("sheet1")),true); |
| //得到全部Cells，此時,rgMyRge是cells的集合 |
| rgMyRge.AttachDispatch(wsMysheet.GetCells(),true); |
| rgMyRge.SetItem(_variant_t((long)1),_variant_t((long)1),_variant_t("This Is A Excel Test Program!")); |
| rgMyRge.AttachDispatch(wsMysheet.GetColumns(),true); |
| rgMyRge.AttachDispatch(rgMyRge.GetItem(_variant_t((long)1),vtMissing).pdispVal,true); |
| rgMyRge.SetColumnWidth(_variant_t((long)200)); |
| ExcelApp.Run(_variant_t("CopyRow"),_variant_t((long)10),vtMissing,vtMissing, |
| vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing, |
| vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing, |
| vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing, |
| vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing); |
| ExcelApp.SetVisible(true); |
| wbMyBook.PrintPreview(_variant_t(false)); |
| rgMyRge.ReleaseDispatch(); |
| wsMysheet.ReleaseDispatch(); |
| wssMysheets.ReleaseDispatch(); |
| wbMyBook.ReleaseDispatch(); |
| wbsMyBooks.ReleaseDispatch(); |
| ExcelApp.ReleaseDispatch(); |