A. vc++怎樣從excel文件中讀寫數據
轉載:
首先利用Visual C++ 6.0,建立一個MFC基於對話框的工程項目,共享DLL,Win32平台。工程名稱ExcelTest。在主對話框中加入一個按鈕,
ID IDC_EXCELTEST
Caption Test Excel
雙擊該按鈕,增加成員函數void CExcelTestDlg::OnExceltest()。
在BOOL CExcelTestApp::InitInstance()中,dlg.DoModal();之前增加代碼:
if (CoInitialize(NULL)!=0)
{
AfxMessageBox("初始化COM支持庫失敗!");
exit(1);
}
在return FALSE; 語句前,加入:
CoUninitialize();
選擇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"語句之下,增加 :
#include "comdef.h"
#include "Excel9.h"
在void CExcelTestDlg::OnExceltest() 函數中增加如下代碼:
void CExcelTestDlg::OnExceltest()
{
_Application ExcelApp;
Workbooks wbsMyBooks;
_Workbook wbMyBook;
Worksheets wssMysheets;
_Worksheet wsMysheet;
Range rgMyRge;
//創建Excel 2000伺服器(啟動Excel)
if (!ExcelApp.CreateDispatch("Excel.Application",NULL))
{
AfxMessageBox("創建Excel服務失敗!");
exit(1);
}
//利用模板文件建立新文檔
wbsMyBooks.AttachDispatch(ExcelApp.GetWorkbooks(),true);
wbMyBook.AttachDispatch(wbsMyBooks.Add(_variant_t("g:\\exceltest\\MyTemplate.xlt")));
//得到Worksheets
wssMysheets.AttachDispatch(wbMyBook.GetWorksheets(),true);
//得到sheet1
wsMysheet.AttachDispatch(wssMysheets.GetItem(_variant_t("sheet1")),true);
//得到全部Cells,此時,rgMyRge是cells的集合
rgMyRge.AttachDispatch(wsMysheet.GetCells(),true);
//設置1行1列的單元的值
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);
//列印預覽
wbMyBook.SetSaved(true);
ExcelApp.SetVisible(true);
wbMyBook.PrintPreview(_variant_t(false));
//釋放對象
rgMyRge.ReleaseDispatch();
wsMysheet.ReleaseDispatch();
wssMysheets.ReleaseDispatch();
wbMyBook.ReleaseDispatch();
wbsMyBooks.ReleaseDispatch();
ExcelApp.ReleaseDispatch();
}
B. VC操作excel需要導入他的dll文件嗎
解決辦法有兩個:
安裝對應開發版本的Office PIA,這個在微軟官網可以搜索到並免費下載。
通過安裝程序復制並注冊DLL。這些DLL/OCX不是復制過去就可以用的,必須使用regsvr32命令或在代碼中使用函數dllregisterserver進行組件注冊,才能使用。
Excel實際需要的DLL有三個:
Microsoft.Office.Interop.Excel.dll
Microsoft.Vbe.Interop.dll
Office.dll
如果是高版本VS,可以整合到project中,並直接建立發布,即可完成打包。如果是VC6,你需要在InstallShield中,通過dllregisterserver手動完成注冊。或者,不打包,復制過去之後手動完成注冊。
更多圖文信息,網路「Office PIA 部署」。