簡(jiǎn)介面向具備 C 基礎(chǔ)的 Windows 客戶端開(kāi)發(fā)者的 MFC 操作 Excel 示例工程圍繞 COM 組件接口演示如何在桌面程序中創(chuàng)建、讀寫(xiě)并保存 Excel 工作簿解決日常業(yè)務(wù)里報(bào)表導(dǎo)出與數(shù)據(jù)導(dǎo)入的實(shí)現(xiàn)問(wèn)題適合想了解 MFC 與 Office 自動(dòng)化如何銜接的中級(jí)讀者參考。壓縮包共 41 個(gè)文件、約 178KB以 26 個(gè) .h 頭文件和 4 個(gè) .cpp 源文件為主體另有 sln 與 vcxproj 工程配置、rc 與 ico 資源文件及 2 個(gè) txt 說(shuō)明文本是一個(gè)可直接編譯的對(duì)話框工程內(nèi)含 ExcelLib、Export2Excel 等封裝模塊。已有 259 人學(xué)習(xí)下載。讀者可獲得 COM 環(huán)境初始化與釋放、Application/Workbook/Worksheet/Range 對(duì)象模型的使用脈絡(luò)以及單元格寫(xiě)入讀取、另存、退出時(shí)對(duì)象釋放與異常捕獲等關(guān)鍵環(huán)節(jié)的代碼參照便于對(duì)照改造為自身的導(dǎo)出功能。1. 一個(gè)被低估的“導(dǎo)出”按鈕產(chǎn)品經(jīng)理在 MFC 客戶端上加了一個(gè)按鈕把當(dāng)前列表導(dǎo)出成 Excel。開(kāi)發(fā)看到需求的反應(yīng)往往是“一下午的事”結(jié)果代碼寫(xiě)完進(jìn)程管理器里躺著一排 EXCEL.EXE客戶那邊的表格打開(kāi)全是 ####雙擊 CSV 中文亂碼。MFC 操作 Excel 這件事難點(diǎn)從來(lái)不在“怎么寫(xiě)第一行”而在選型、釋放順序、編碼和批量寫(xiě)入這四個(gè)地方。這份資源就是圍繞這條鏈路整理的一套可編譯示例COM 自動(dòng)化怎么開(kāi)怎么收、CSV 和 SpreadsheetML 怎么在不開(kāi) Excel 的前提下落地、第三方 xlsx 庫(kù)怎么塞進(jìn) MFC 工程、以及三條路線怎么用一層接口隔開(kāi)方便換。適合正在給存量 MFC 項(xiàng)目補(bǔ)導(dǎo)出功能的人也適合接手別人代碼、被殘留進(jìn)程和亂碼反復(fù)消耗的人。下面按“選路線 → 跑通 → 批量?jī)?yōu)化 → 避坑”的順序拆。2. 三條路線的分水嶺先定方案再敲第一行代碼接手這類需求最常見(jiàn)的錯(cuò)誤是打開(kāi)搜索引擎抄一段CreateDispatch就開(kāi)干。代碼能跑但沒(méi)人回答一個(gè)問(wèn)題這個(gè)功能到底需要“生成一個(gè)能被業(yè)務(wù)方繼續(xù)編輯的 Excel”還是只需要“給對(duì)方一份能導(dǎo)入系統(tǒng)的表格”。這兩個(gè)訴求對(duì)應(yīng)的實(shí)現(xiàn)代價(jià)差著一個(gè)數(shù)量級(jí)前者要么依賴本機(jī)裝了 Excel要么引入一個(gè)完整的 xlsx 讀寫(xiě)庫(kù)后者一行 CSV 寫(xiě)文件就能解決還不占進(jìn)程。所以動(dòng)手之前先把路線定死再?zèng)Q定代碼放哪一層。這一步花二十分鐘后面能省兩天。2.1 COM 自動(dòng)化、文件格式、第三方庫(kù)各自的適用邊界把三條路線的依賴和風(fēng)險(xiǎn)攤開(kāi)看選擇其實(shí)很清楚。路線前置依賴讀寫(xiě)格式能力主要風(fēng)險(xiǎn)COM 自動(dòng)化目標(biāo)機(jī)必須裝 Excel且注冊(cè)正常強(qiáng)強(qiáng)公式、樣式、圖表、多 Sheet 全支持進(jìn)程殘留、彈框阻塞、跨位數(shù)與環(huán)境差異純文件格式CSV / SpreadsheetML無(wú)CSV 弱、XML 可讀可寫(xiě)只有值無(wú)樣式XML 有基礎(chǔ)樣式編碼、轉(zhuǎn)義、行列上限第三方 xlsx 庫(kù)隨程序分發(fā)靜態(tài)鏈接視庫(kù)而定強(qiáng)值 常用樣式公式支持看庫(kù)授權(quán)、體積、中文路徑、異常處理COM 路線的核心優(yōu)勢(shì)是“所見(jiàn)即所得”業(yè)務(wù)方要合并單元格、要條件格式、要在導(dǎo)出文件里帶一個(gè)數(shù)據(jù)透視表只有它能干。代價(jià)是把一部分可靠性交給了目標(biāo)機(jī)器——機(jī)器上沒(méi)裝 Excel、裝的是精簡(jiǎn)版、注冊(cè)表被清理工具動(dòng)過(guò)你的導(dǎo)出功能就直接趴下。CSV 和 SpreadsheetML 的優(yōu)勢(shì)是完全可控不依賴任何外部程序?qū)懲昃徒Y(jié)束沒(méi)有進(jìn)程、沒(méi)有彈框、沒(méi)有句柄泄漏。限制也很硬CSV 單表、無(wú)樣式SpreadsheetML 2003 是 XML 文本能帶樣式和列寬但文件體積大且部分新版工具對(duì)它的兼容性在退化。我在給內(nèi)部系統(tǒng)做“導(dǎo)出對(duì)賬單”這類需求時(shí)基本都走 CSV因?yàn)閷?duì)方拿到就是導(dǎo)入另一個(gè)系統(tǒng)樣式毫無(wú)意義。第三方 xlsx 庫(kù)落在中間程序自帶實(shí)現(xiàn)不依賴本機(jī)裝沒(méi)裝 Excel同時(shí)能產(chǎn)出真正的 xlsx帶基本樣式。選型時(shí)看四條——能不能靜態(tài)鏈接、異常是拋還是返回碼、路徑收不收寬字符、授權(quán)是否允許商用分發(fā)。第三條最容易被忽略第 4 章會(huì)展開(kāi)。一個(gè)務(wù)實(shí)的組合是主路線走 xlsx 庫(kù)另外保留一條 COM 路線給“需要復(fù)雜格式”的少數(shù)報(bào)表再用 CSV 做兜底降級(jí)。資源里的接口層就是為這個(gè)組合準(zhǔn)備的。2.2 AfxOleInit 與 CoInitializeEx初始化放哪、用哪個(gè)MFC 工程的 COM 初始化有兩個(gè)入口很多人混著用。AfxOleInit()內(nèi)部就是OleInitialize它把 OLE 相關(guān)的剪貼板格式、拖放、OLE 控件承載一并初始化好裸CoInitializeEx(NULL, COINIT_APARTMENTTHREADED)只做 COM 部分。如果你的對(duì)話框里以后可能放 OLE 控件、要支持文件拖放用AfxOleInit()省事如果只是調(diào) Excel 的自動(dòng)化接口兩者都行但同一個(gè)線程里別重復(fù)用不同的套間模型。放在InitInstance最前面并且失敗時(shí)不要直接return FALSE// App.cpp —— 單實(shí)例初始化放在 InitInstance 的最前面 BOOL CExportDemoApp::InitInstance() { // 用 AfxOleInit 而不是裸 CoInitializeEx // 后續(xù)如果對(duì)話框里要放 OLE 控件、要支持拖放只有它會(huì)把相關(guān)狀態(tài)一并初始化 if (!AfxOleInit()) { // 導(dǎo)出屬于可降級(jí)功能主流程不該因?yàn)?COM 起不來(lái)就整個(gè)退出 AfxMessageBox(_T(OLE 初始化失敗Excel 相關(guān)功能不可用已切換為文件導(dǎo)出)); m_bComAvailable FALSE; } CWinApp::InitInstance(); // ... 其余初始化 return TRUE; }工作線程是另一回事。COM 的套間是按線程算的主線程初始化過(guò)不代表子線程能用。把導(dǎo)出扔到后臺(tái)線程時(shí)線程入口第一件事必須是自己初始化并且只能用 STA// ExportThread.cpp —— STA 是硬約束Excel 是單元線程模型的服務(wù)端 UINT CExportThread::Run() { // 工作線程必須獨(dú)立初始化 COM用 MTA 調(diào) Excel 會(huì)直接拿不到接口 HRESULT hr CoInitializeEx(NULL, COINIT_APARTMENTTHREADED); if (FAILED(hr)) { PostMessage(WM_EXPORT_DONE, FALSE, 0); return 0; } BOOL bOk DoExportWork(); CoUninitialize(); // 與上面的 CoInitializeEx 嚴(yán)格配對(duì) PostMessage(WM_EXPORT_DONE, bOk, 0); // UI 更新只回傳消息不碰 MFC 對(duì)象 return 0; }這里有個(gè)血淚經(jīng)驗(yàn)工作線程里絕對(duì)不能直接用主線程的CWnd指針去更新進(jìn)度條。MFC 的窗口對(duì)象有線程歸屬跨線程調(diào)用在 Debug 下可能僥幸跑過(guò)Release 下就是隨機(jī)崩潰。正確做法是算好進(jìn)度、PostMessage丟回主線程由主線程更新控件。2.3 用類型庫(kù)導(dǎo)入替代硬編碼安裝路徑COM 路線的第一種寫(xiě)法是COleDispatchDriver加手工填DISPID第二種是#import類型庫(kù)讓編譯器生成包裝類。資源里用的是后者理由很實(shí)在Invoke的參數(shù)順序、VARIANT類型、返回值判斷全由生成的代碼處理寫(xiě)錯(cuò)了編譯期就能發(fā)現(xiàn)而不是運(yùn)行期收到一個(gè)DISP_E_TYPEMISMATCH。關(guān)鍵點(diǎn)是不要寫(xiě)死 EXCEL.EXE 的安裝路徑那玩意在不同版本、不同安裝方式下位置完全不一樣。用類型庫(kù) GUID 導(dǎo)入// ExcelTypes.h —— 全工程只在這一處引入類型庫(kù)其他文件包含它即可 #pragma once // 用類型庫(kù) GUID 導(dǎo)入避免把 Office 的安裝路徑寫(xiě)死 // 同一臺(tái)機(jī)器裝過(guò)多個(gè)版本時(shí)可以加 version(1.9) 鎖定版本代價(jià)是老環(huán)境導(dǎo)不進(jìn)來(lái) #import libid:00020813-0000-0000-C000-000000000046 \ named_guids \ no_namespace \ rename(RGB, XL_RGB) \ rename(DialogBox, XL_DialogBox) \ rename(CopyFile, XL_CopyFile) \ rename(GetObject, XL_GetObject) \ rename(FindText, XL_FindText)幾行rename不是多余的。類型庫(kù)里有個(gè)RGBMFC 里也有RGB宏類型庫(kù)里有DialogBox全局作用域里也有同名函數(shù)。不重命名包含順序一變就是一堆“重定義”報(bào)錯(cuò)這種報(bào)錯(cuò)信息指向的是系統(tǒng)頭文件排查起來(lái)非常費(fèi)勁。named_guids讓生成的.tlh里同時(shí)定義CLSID_Application之類的常量方便后續(xù)用__uuidof(Excel::Application)拿 coclass。生成的包裝指針如Excel::_ApplicationPtr本質(zhì)是_com_ptr_t析構(gòu)時(shí)會(huì)自動(dòng)Release這一點(diǎn)比手寫(xiě)LPDISPATCH安全得多——前提是你別在中途把它Detach()掉。提示#import生成的是.tlh/.tli兩個(gè)中間文件放在編譯輸出目錄里。清理工程時(shí)它們可能殘留改過(guò)類型庫(kù)導(dǎo)入語(yǔ)句后如果行為沒(méi)變化先把這兩個(gè)文件刪掉重編。3. COM 自動(dòng)化實(shí)戰(zhàn)從打開(kāi)工作簿到批量寫(xiě)單元格路線定成 COM 之后代碼要解決的是三件事把對(duì)象鏈建起來(lái)、把數(shù)據(jù)塞進(jìn)去、把對(duì)象鏈按正確順序拆掉。第三件最容易出事而它偏偏在功能驗(yàn)收時(shí)看不出來(lái)——開(kāi)發(fā)和測(cè)試機(jī)器上跑十次都正常裝到客戶機(jī)上就變成“每次導(dǎo)出后多一個(gè) EXCEL.EXE”。3.1 最小可運(yùn)行鏈路創(chuàng)建、寫(xiě)入、另存、退出先把最短路徑跑通別一上來(lái)就封裝。下面這段是能編譯、能出文件的最小實(shí)現(xiàn)// ExcelExporter.cpp —— 最小可運(yùn)行鏈路先把這一段跑通再談封裝 #include pch.h #include ExcelTypes.h #include comdef.h bool ExportDemo(const CString strPath, CString strErr) { Excel::_ApplicationPtr spApp; // CLSCTX_LOCAL_SERVERExcel 是獨(dú)立進(jìn)程的服務(wù)端這一點(diǎn)決定了后面必須有 Quit HRESULT hr spApp.CreateInstance(__uuidof(Excel::Application)); if (FAILED(hr)) { strErr _T(無(wú)法啟動(dòng) Excel請(qǐng)確認(rèn)本機(jī)已安裝且 COM 注冊(cè)正常); return false; } try { // 三個(gè)開(kāi)關(guān)后臺(tái)跑、不彈框、不刷新界面 spApp-Visible VARIANT_FALSE; spApp-DisplayAlerts VARIANT_FALSE; spApp-ScreenUpdating VARIANT_FALSE; Excel::_WorkbookPtr spBook spApp-Workbooks-Add(); Excel::_WorksheetPtr spSheet spBook-Worksheets-Item[_variant_t(1L)]; // Value2 接收 VARIANT字符串用 _variant_t 包一層別直接賦 CString spSheet-Range[_variant_t(_T(A1))]-Value2 _variant_t(_T(編號(hào))); spSheet-Range[_variant_t(_T(B1))]-Value2 _variant_t(_T(名稱)); spSheet-Range[_variant_t(_T(A2))]-Value2 _variant_t(1L); spSheet-Range[_variant_t(_T(B2))]-Value2 _variant_t(_T(示例行)); // 51 xlOpenXMLWorkbook即 xlsx存成 xls 用 -4143CSV 用 6 spBook-SaveAs(_variant_t((LPCTSTR)strPath), _variant_t(51L)); // 順序不能反先關(guān)工作簿再退出應(yīng)用 spBook-Close(_variant_t(VARIANT_FALSE)); spApp-Quit(); } catch (_com_error e) { strErr e.ErrorMessage(); // 異常路徑同樣要盡力退出否則又是一個(gè)殘留進(jìn)程 try { spApp-Quit(); } catch (...) {} return false; } return true; }代碼之后要解釋幾個(gè)點(diǎn)。CreateInstance拿的是 coclassExcel 作為本地服務(wù)端進(jìn)程被拉起來(lái)這一步之后任務(wù)管理器里就已經(jīng)有一個(gè) EXCEL.EXE 了即使你后面什么都沒(méi)干。Visible VARIANT_FALSE只是讓它不顯示窗口不減少進(jìn)程。Value2和Value的區(qū)別值得說(shuō)清楚Value2不經(jīng)過(guò)貨幣和日期類型的轉(zhuǎn)換純數(shù)值就是 double速度略快一般導(dǎo)出場(chǎng)景都用它。但正因?yàn)椴蛔鲛D(zhuǎn)換寫(xiě)入字符串形式的數(shù)字時(shí)要特別小心第 5 章會(huì)講它怎么把1-2變成日期。SaveAs的FileFormat參數(shù)是枚舉值不是字符串寫(xiě)錯(cuò)不會(huì)報(bào)錯(cuò)只會(huì)生成一個(gè)后綴對(duì)、內(nèi)容不對(duì)的文件。常用取值51是 xlsx-4143是 xls6是 CSV-4146是 SpreadsheetML 2003 的 XML。3.2 SAFEARRAY 批量寫(xiě)把逐單元格賦值換掉上面那種一格一格賦值的寫(xiě)法一萬(wàn)行八列就是八萬(wàn)次跨進(jìn)程調(diào)用每次調(diào)用都要走一遍 COM 的列集散集實(shí)測(cè)下來(lái)分鐘級(jí)起步。真正的做法是構(gòu)造一個(gè)二維SAFEARRAY一次性賦給一個(gè)區(qū)域// 行列號(hào)轉(zhuǎn) A1 地址列號(hào)從 1 開(kāi)始超過(guò) 26 列要換成 AA/AB 的二十六進(jìn)制換算 static CString MakeRangeAddress(long nRow1, long nCol1, long nRow2, long nCol2) { CString str; str.Format(_T(%c%ld:%c%ld), (TCHAR)(A (nCol1 - 1)), nRow1, (TCHAR)(A (nCol2 - 1)), nRow2); return str; } bool WriteBlockFast(Excel::_WorksheetPtr spSheet, const std::vectorstd::vectorCString rows, CString strErr) { const long nRows (long)rows.size(); if (nRows 0) return true; const long nCols (long)rows[0].size(); SAFEARRAYBOUND bounds[2]; bounds[0].lLbound 0; bounds[0].cElements nRows; // 第 1 維是行 bounds[1].lLbound 0; bounds[1].cElements nCols; // 第 2 維是列 SAFEARRAY* psa SafeArrayCreate(VT_VARIANT, 2, bounds); if (psa nullptr) { strErr _T(創(chuàng)建數(shù)據(jù)塊失敗數(shù)據(jù)量過(guò)大); return false; } for (long r 0; r nRows; r) { for (long c 0; c nCols; c) { LONG idx[2] { r, c }; // 索引順序必須和 bounds 一致 VARIANT v; VariantInit(v); v.vt VT_BSTR; v.bstrVal rows[r][c].AllocSysString(); SafeArrayPutElement(psa, idx, v); // 內(nèi)部做拷貝源必須自己清理 VariantClear(v); // 不清就是每格一個(gè) BSTR 泄漏 } } try { // 區(qū)域尺寸必須和數(shù)據(jù)塊嚴(yán)格一致多一行少一列都會(huì)拋 DISP_E_EXCEPTION const CString strAddr MakeRangeAddress(1, 1, nRows, nCols); _variant_t varBlock; varBlock.vt VT_ARRAY | VT_VARIANT; varBlock.parray psa; // 所有權(quán)移交給 _variant_t psa nullptr; // 置空防止作用域結(jié)束時(shí)重復(fù)釋放 spSheet-Range[_variant_t((LPCTSTR)strAddr)]-Value2 varBlock; // varBlock 析構(gòu)時(shí) VariantClear 會(huì)自動(dòng) SafeArrayDestroy不用手工釋放 } catch (_com_error e) { if (psa) SafeArrayDestroy(psa); strErr e.ErrorMessage(); return false; } return true; }參數(shù)上有兩個(gè)容易翻車(chē)的點(diǎn)。第一是維度順序bounds[0]對(duì)應(yīng)的是行SafeArrayPutElement的idx[0]也必須是行號(hào)寫(xiě)反了數(shù)據(jù)會(huì)轉(zhuǎn)置著填進(jìn)表格而且不報(bào)錯(cuò)。第二是所有權(quán)psa一旦交給_variant_t就絕對(duì)不能再手動(dòng)SafeArrayDestroy否則是雙重釋放程序直接退出且崩潰棧指向 COM 內(nèi)部非常難查。另外一次性賦值的數(shù)據(jù)塊別太大。十萬(wàn)行乘二十列塞進(jìn)一個(gè)SAFEARRAY光構(gòu)造過(guò)程就吃掉幾百兆內(nèi)存Excel 那邊再?gòu)?fù)制一份32 位程序很容易碰到地址空間上限。我一般按五千到一萬(wàn)行切塊每塊賦給一個(gè)區(qū)域間隔里刷新一下進(jìn)度。3.3 參數(shù)清單哪些開(kāi)關(guān)必須關(guān)關(guān)了有什么副作用COM 自動(dòng)化里幾個(gè)屬性直接決定成敗整理成表方便對(duì)照。屬性 / 參數(shù)常用取值作用副作用與注意VisibleFalse不顯示窗口不減少進(jìn)程調(diào)試時(shí)建議臨時(shí)設(shè)True看現(xiàn)場(chǎng)DisplayAlertsFalse覆蓋、格式警告不彈模態(tài)框出錯(cuò)時(shí)也靜默異常要靠_com_error捕獲ScreenUpdatingFalse關(guān)閉界面刷新寫(xiě)入提速明顯結(jié)束后要恢復(fù)為T(mén)rue否則用戶看到的是白屏EnableEventsFalse抑制工作表事件避免觸發(fā)用戶宏用戶自定義函數(shù)不會(huì)重算導(dǎo)出完成后要手動(dòng)CalculateCalculation-4135手動(dòng)關(guān)掉自動(dòng)重算大量公式的場(chǎng)景提速最明顯但值可能是舊的SaveAs的FileFormat51/6/-4143決定實(shí)際文件格式與文件后綴無(wú)關(guān)寫(xiě)錯(cuò)會(huì)生成“假后綴”文件Workbooks.Open的UpdateLinks0不更新外部鏈接打開(kāi)帶外鏈的表時(shí)避免長(zhǎng)時(shí)間卡住和彈框Calculation那一項(xiàng)值得單獨(dú)說(shuō)。默認(rèn) Excel 是自動(dòng)重算你在一個(gè)有幾萬(wàn)行公式的工作簿里逐塊寫(xiě)值每寫(xiě)一塊它就重算一遍耗時(shí)能翻好幾倍。導(dǎo)出場(chǎng)景下把計(jì)算改成手動(dòng)全部寫(xiě)完、保存前再調(diào)一次Calculate是標(biāo)準(zhǔn)的提速套路。4. 輕量導(dǎo)出與第三方庫(kù)把 COM 從主路徑上摘掉很多項(xiàng)目走到這一步會(huì)發(fā)現(xiàn)真正需要 Excel 格式的報(bào)表只占兩成剩下八成都是“導(dǎo)出一份給業(yè)務(wù)看”或“導(dǎo)出給另一個(gè)系統(tǒng)導(dǎo)入”。把這兩類需求都?jí)航o COM等于讓整個(gè)導(dǎo)出功能綁死在目標(biāo)機(jī)裝沒(méi)裝 Excel 上。資源里的做法是分層主路徑用不依賴外部程序的實(shí)現(xiàn)復(fù)雜報(bào)表才走 COM。4.1 CSV 的編碼與轉(zhuǎn)義兩個(gè)必踩的坑CSV 看著簡(jiǎn)單實(shí)際出錯(cuò)率比 COM 還高。第一個(gè)坑是編碼用 ANSI 寫(xiě)換一臺(tái)區(qū)域設(shè)置不同的機(jī)器打開(kāi)就是亂碼用 UTF-8 不帶 BOM 寫(xiě)Excel 雙擊打開(kāi)同樣亂碼因?yàn)樗跊](méi)有 BOM 時(shí)會(huì)按本地代碼頁(yè)猜。穩(wěn)妥做法是寫(xiě) UTF-8 帶 BOM。// CsvWriter.cpp —— UTF-8 BOM字段按 RFC 4180 轉(zhuǎn)義 static CStringA ToUtf8(const CString strSrc) { int n ::WideCharToMultiByte(CP_UTF8, 0, strSrc, -1, nullptr, 0, nullptr, nullptr); std::vectorchar buf(n 0 ? n : 1, 0); if (n 0) ::WideCharToMultiByte(CP_UTF8, 0, strSrc, -1, buf.data(), n, nullptr, nullptr); return CStringA(buf.data()); } static CStringA EscapeField(const CString strField) { CString str strField; // 含逗號(hào)、引號(hào)、換行的字段必須整體加引號(hào)內(nèi)部引號(hào)翻倍 BOOL bNeedQuote str.FindOneOf(_T(,\\r\n)) 0; str.Replace(_T(\), _T(\\)); CStringA strUtf8 ToUtf8(str); return bNeedQuote ? CStringA(\) strUtf8 \ : strUtf8; } bool WriteCsv(const CString strPath, const std::vectorstd::vectorCString rows) { CFile file; if (!file.Open(strPath, CFile::modeCreate | CFile::modeWrite | CFile::shareExclusive)) return false; // UTF-8 BOM本地化環(huán)境里雙擊打開(kāi)時(shí)靠這三個(gè)字節(jié)識(shí)別編碼 const BYTE bom[3] { 0xEF, 0xBB, 0xBF }; file.Write(bom, 3); CStringA strLine; for (const auto row : rows) { strLine.Empty(); for (size_t i 0; i row.size(); i) { if (i 0) strLine ,; strLine EscapeField(row[i]); } strLine \r\n; // 行尾用 CRLF純 LF 在部分工具里會(huì)被當(dāng)成一整行 file.Write(strLine, strLine.GetLength()); } file.Close(); return true; }轉(zhuǎn)義這塊CString::Replace把引號(hào)翻倍必須在加外層引號(hào)之前做順序反了會(huì)把外層引號(hào)也翻倍。行尾統(tǒng)一\r\n只寫(xiě)\n的話部分老版本工具打開(kāi)會(huì)擠成一行。第二個(gè)坑是數(shù)據(jù)本身的類型。CSV 里沒(méi)有類型信息編號(hào)00123寫(xiě)進(jìn)去再打開(kāi)就變成123長(zhǎng)數(shù)字會(huì)被識(shí)別成科學(xué)計(jì)數(shù)法。解決辦法只有兩個(gè)要么在字段值前面加一個(gè)制表符或單引號(hào)丑但有效要么干脆別用 CSV 承載這類數(shù)據(jù)換第 4.2 節(jié)的 xlsx 路線。這也是我給“對(duì)賬單導(dǎo)出”選 CSV、給“卡號(hào)名單導(dǎo)出”選 xlsx 的原因。4.2 在 MFC 工程里掛一個(gè) xlsx 庫(kù)的最小改動(dòng)第三方 xlsx 庫(kù)的選擇面不小常見(jiàn)的分兩類只寫(xiě)不讀的、讀寫(xiě)都支持的。導(dǎo)出場(chǎng)景只需要寫(xiě)選只寫(xiě)的那類體積更小、API 更直白。下面的代碼用一個(gè)抽象命名空間xw表示你所選庫(kù)的接口接入時(shí)替換成實(shí)際的頭文件和調(diào)用。// XlsxWriterAdapter.cpp —— 把第三方庫(kù)完全藏在實(shí)現(xiàn)文件里頭文件不外泄 #include pch.h #include IExcelWriter.h #include xw/xw.h // 換成你實(shí)際選用的庫(kù) static std::string ToUtf8(const CString strSrc) { int n ::WideCharToMultiByte(CP_UTF8, 0, strSrc, -1, nullptr, 0, nullptr, nullptr); std::vectorchar buf(n 0 ? n : 1, 0); if (n 0) ::WideCharToMultiByte(CP_UTF8, 0, strSrc, -1, buf.data(), n, nullptr, nullptr); return std::string(buf.data()); } class CXlsxWriter : public IExcelWriter { public: bool Open(const CString strPath) override { // 路徑先轉(zhuǎn) UTF-8多數(shù)跨平臺(tái)庫(kù)內(nèi)部按窄字符處理 // 直接強(qiáng)轉(zhuǎn) CStringA 會(huì)讓中文目錄下的文件名變成亂碼甚至創(chuàng)建失敗 m_book xw::create_workbook(ToUtf8(strPath)); return m_book ! nullptr; } bool WriteSheet(const SheetData data) override { if (!m_book) return false; auto sheet m_book-add_sheet(ToUtf8(data.strSheetName)); long nRow 0; for (size_t c 0; c data.vecHeader.size(); c) sheet-write_string(nRow, (int)c, ToUtf8(data.vecHeader[c])); for (const auto row : data.vecRows) { nRow; for (size_t c 0; c row.size(); c) { // 純數(shù)字走數(shù)值接口避免被當(dāng)成文本后在表格里顯示左對(duì)齊的小三角 double d 0; if (IsNumericField(row[c], d)) sheet-write_number(nRow, (int)c, d); else sheet-write_string(nRow, (int)c, ToUtf8(row[c])); } } return true; } bool Save() override { return m_book ? m_book-save() : false; } private: std::unique_ptrxw::Workbook m_book; };接入這類庫(kù)時(shí)改動(dòng)很小一般就是三步把頭文件和源文件加進(jìn)工程、把庫(kù)目錄加進(jìn)“附加包含目錄”、把.lib加進(jìn)鏈接器輸入。麻煩的是編譯期沖突老工程里定義了min/max宏庫(kù)頭文件里的std::min就會(huì)炸有的庫(kù)用了std::filesystem工程卻還鎖在舊的語(yǔ)言標(biāo)準(zhǔn)上。資源里把這些適配細(xì)節(jié)集中在適配層里就是為了把這類問(wèn)題關(guān)在一個(gè)文件內(nèi)。unique_ptr需要 C11 以上老編譯器環(huán)境換成裸指針加手寫(xiě)析構(gòu)邏輯一樣。4.3 用接口層把三條路線隔開(kāi)三條路線各自實(shí)現(xiàn)一套業(yè)務(wù)代碼里到處if判斷走哪條是這類功能日后最難維護(hù)的寫(xiě)法。正確姿勢(shì)是先定義一個(gè)極窄的接口只暴露“開(kāi)、寫(xiě)一頁(yè)、存”三個(gè)動(dòng)作// IExcelWriter.h —— 業(yè)務(wù)層只認(rèn)識(shí)這三個(gè)函數(shù) #pragma once #include vector #include memory struct SheetData { CString strSheetName; std::vectorCString vecHeader; std::vectorstd::vectorCString vecRows; }; class IExcelWriter { public: virtual ~IExcelWriter() {} virtual bool Open(const CString strPath) 0; virtual bool WriteSheet(const SheetData data) 0; virtual bool Save() 0; }; enum EExportRoute { Route_Com 0, Route_Xlsx, Route_Csv }; // 工廠按配置或運(yùn)行時(shí)探測(cè)結(jié)果選路線業(yè)務(wù)層不感知 std::unique_ptrIExcelWriter CreateWriter(EExportRoute eRoute) { switch (eRoute) { case Route_Com: return std::unique_ptrIExcelWriter(new CComExcelWriter()); case Route_Xlsx: return std::unique_ptrIExcelWriter(new CXlsxWriter()); case Route_Csv: return std::unique_ptrIExcelWriter(new CCsvWriter()); } return nullptr; }接口的設(shè)計(jì)取舍在于不要把 COM 特有的Range、Worksheet暴露出去否則接口一旦被其他路線實(shí)現(xiàn)就全是空函數(shù)也不要把樣式參數(shù)塞進(jìn)來(lái)樣式在各本文還有配套的精品資源點(diǎn)擊獲取