用程式操作開啟Excel文件，出現 "外部資料表不是預期的格式"
或是用Excel開啟文件，出現檔案格式不相符的訊息
存檔時將文件格式指定為 "一般活頁簿"，可以排除這類的狀況。
excel := CreateOleObject('Excel.Application');
excel.Visible := False;
excel.Workbooks.Add;
workbook := excel.Workbooks[1];
...
...
workbook.SaveAs(OleVariat(filename), -4143);
XlFileFormat 列舉 (Excel)
會指定儲存工作表時的檔案格式。
| 名稱 | 值 | 描述 | 副檔名 |
|---|---|---|---|
| xlAddIn | 18 | Microsoft Excel 97-2003 增益集 | *.xla |
| xlAddIn8 | 18 | Microsoft Excel 97-2003 增益集 | *.xla |
| xlCSV | 6 | CSV | *.csv |
| xlCSVMac | 22 | Macintosh CSV | *.csv |
| xlCSVMSDOS | 24 | MSDOS CSV | *.csv |
| xlCSVUTF8 | 62 | UTF8 CSV | *.csv |
| xlCSVWindows | 至 | Windows CSV | *.csv |
| xlCurrentPlatformText | -4158 | 目前平台文字 | *.txt |
| xlDBF2 | 7 | Dbase 2 格式 | *.dbf |
| xlDBF3 | 8 | Dbase 3 格式 | *.dbf |
| xlDBF4 | 11 | Dbase 4 格式 | *.dbf |
| xlDIF | 9 | 資料交換格式 | *.dif |
| xlExcel12 | 50 | Excel 二進位活頁簿 | *.xlsb |
| xlExcel2 | 16 | Excel 2.0 版 (1987) | *.xls |
| xlExcel2FarEast | 7 | Excel 2.0 遠東版 (1987) | *.xls |
| xlExcel3 | 29 | Excel 3.0 版 (1990) | *.xls |
| xlExcel4 | 33 | Excel 4.0 版 (1992) | *.xls |
| xlExcel4Workbook | 35 | Excel 4.0 版 活頁簿格式 (1992) | *.xlw |
| xlExcel5 | 39 | Excel 5.0 版 (1994) | *.xls |
| xlExcel7 | 39 | Excel 95 (7.0 版) | *.xls |
| xlExcel8 | 56 | Excel 97-2003 活頁簿 | *.xls |
| xlExcel9795 | 43 | Excel 95 與 97 版 | *.xls |
| xlHtml | 44 | HTML 格式 | .htm；.html |
| xlIntlAddIn | 得到 | 國際增益集 | 沒有副檔名 |
| xlIntlMacro | 0.25 | 國際巨集 | 沒有副檔名 |
| xlOpenDocumentSpreadsheet | 60 | OpenDocument 試算表 | *.ods |
| xlOpenXMLAddIn | 55 | 開啟 XML 增益集 | *.xlam |
| xlOpenXMLStrictWorkbook | 61 (&H3D) | Strict Open XML 檔案 | *.xlsx |
| xlOpenXMLTemplate | 54 | 開啟 XML 範本 | *.xltx |
| xlOpenXMLTemplateMacroEnabled | 53 | 開啟 Open XML 範本巨集啟用 | *.xltm |
| xlOpenXMLWorkbook | 51 | 開啟 XML 活頁簿 | *.xlsx |
| xlOpenXMLWorkbookMacroEnabled | 52 | 開啟 XML 活頁簿巨集啟用 | *.xlsm |
| xlSYLK | 第 | 符號連結格式 | *.slk |
| xlTemplate | 17 | Excel 範本格式 | *.xlt |
| xlTemplate8 | 17 | 範本 8 | *.xlt |
| xlTextMac | 19 | Macintosh 文字 | *.txt |
| xlTextMSDOS | 21 | MSDOS 文字 | *.txt |
| xlTextPrinter | 36 | 印表機文字 | *.prn |
| xlTextWindows | 共 | Windows 文字 | *.txt |
| xlUnicodeText | 42 | Unicode 文字 | 沒有副檔名；*.txt |
| xlWebArchive | 45 | Web 封存 | .mht；.mhtml |
| xlWJ2WD1 | 14 | 日文 1-2-3 | *.wj2 |
| xlWJ3 | 40 | 日文 1-2-3 | *.wj3 |
| xlWJ3FJ3 | 41 | 日文 1-2-3 格式 | *.wj3 |
| xlWK1 | 5 | Lotus 1-2-3 格式 | *.wk1 |
| xlWK1ALL | 加 | Lotus 1-2-3 格式 | *.wk1 |
| xlWK1FMT | 大約 | Lotus 1-2-3 格式 | *.wk1 |
| xlWK3 | 15 | Lotus 1-2-3 格式 | *.wk3 |
| xlWK3FM3 | 32 | Lotus 1-2-3 格式 | *.wk3 |
| xlWK4 | 38 | Lotus 1-2-3 格式 | *.wk4 |
| xlWKS | 4 | Lotus 1-2-3 格式 | *.wks |
| xlWorkbookDefault | 51 | 預設活頁簿 | *.xlsx |
| xlWorkbookNormal | -4143 | 一般活頁簿 | *.xls |
| xlWorks2FarEast | 日 | Microsoft Works 2.0 遠東格式 | *.wks |
| xlWQ1 | 34 | Quattro Pro 格式 | *.wq1 |
| xlXMLSpreadsheet | 46 | XML 試算表 | *.xml |
沒有留言:
張貼留言