1、单击“查看”菜单上的“ClassWizard”（或按 Ctrl+W）。如果要使 Excel 97 自动运行，请选择 Microsoft Excel 8.0 对象库；默认位置为 C:\ProgramFiles\Microsoft Office\Office\Excel8.olb）。
2、如果要使 Microsoft Excel 2000 自动运行，请选择 Microsoft Excel 9.0 对象库，其默认位置为 C:\Program Files\Microsoft Office\Office\Excel9.olb。如果要使 Microsoft Excel 2002 和 Microsoft Office Excel 2003 自动运行。
3、则对象库将被嵌入到文件 Excel.exe 中。Office 2002 中的 Excel.exe 文件的默认位置为 C:\Program Files\Microsoft Office\Office10\Excel.exe。
4、 在***Dlg.H中添加头文件#include<comdef.h>#include "excel.h"在***Dlg::OnInitDialog()中添加// 初始化Comif (::CoInitialize( NULL ) == E_INVALIDARG){AfxMessageBox(_T("初始化Com失败!"));exit(1);}if ( !ExcelApp.CreateDispatch(_T("Excel.Application"), NULL)){AfxMessageBox(_T("创建Excel2000服务失败!"));::CoUninitialize();}//打开ExcelApp等等wbsMyBooks.AttachDispatch(ExcelApp.GetWorkbooks(),true);wbMyBook.AttachDispatch(wbsMyBooks.Add(_variant_t("c:\aa.xls")));//得到WorksheetswssMysheets.AttachDispatch(wbMyBook.GetWorksheets(),true);//得到sheet1wsMysheet.AttachDispatch(wssMysheets.GetItem(_variant_t("sheet1")),true);rgMyRge.AttachDispatch(wsMysheet.GetCells(),true);CString a = (LPCTSTR)(_bstr_t)rgMyRge.GetItem(_variant_t((long)i),_variant_t((long)1))。
5、SetItem((_variant_t((long)2),_variant_t((long)3)),_variant_t("fafdad"));//释放资源关闭EXCELrgMyRge.ReleaseDispatch();wsMysheet.ReleaseDispatch();wssMysheets.ReleaseDispatch();wbMyBook.Close (COleVariant((short)(FALSE)), COleVariant((short)(FALSE)),vtMissing);wbsMyBooks.Close();wbMyBook.ReleaseDispatch();wbsMyBooks.ReleaseDispatch();ExcelApp.Quit();ExcelApp.ReleaseDispatch();
