《讀取xls檔案示例》
讀取xls檔案示例 :
//變數定義
_Application app; //Excel應用程式介面
Workbooks books; //工作薄集合
_Workbook book; //工作薄
Worksheets sheets; //工作表集合
_Worksheet sheet; //工作表
Range range; //Excel中針對單元格的操作都應先獲取其對應的Range物件
Font font;
Range cols;
Range iCell;
LPDISPATCH lpDisp;
COleVariant vResult;
COleVariant
covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
//初始化
if( !app.CreateDispatch(L"Excel.Application") ){
this->MessageBox(L"無法建立Excel應用!");
return;
}
app.SetVisible(TRUE); //可見
app.SetUserControl(TRUE); //使用者可控制
//開啟XLS檔案
books.AttachDispatch(app.GetWorkbooks());
lpDisp = books.Open(L"d:\\3.xls",
covOptional, covOptional, covOptional, covOptional, covOptional,
covOptional, covOptional, covOptional, covOptional, covOptional,
covOptional, covOptional );
//得到Workbook
book.AttachDispatch(lpDisp);
//得到Worksheets
sheets.AttachDispatch(book.GetWorksheets());
//得到當前活躍sheet
//如果有單元格正處於編輯狀態中,此操作不能返回,會一直等待
lpDisp=book.GetActiveSheet();
sheet.AttachDispatch(lpDisp);