SaveAs 方法
將範圍值儲存至檔案或串流。成功時傳回 1
語法
function SaveAs(FileName: WideString; FileFormat: TXLSFileFormat): Integer;
function SaveAs(Stream: TStream; FileFormat: TXLSFileFormat): Integer;
| FileName |
WideString,字串,表示要儲存的檔名。可包含完整路徑;若未提供,元件會將檔案儲存在目前資料夾 |
| FileFormat |
TXLSFileFormat,表示要儲存之檔案的格式 |
| Stream |
TStream,儲存到 Stream 參數指定的串流 |
說明
FileFormat 可為下列 TXLSFileFormat 常數之一
| xlHTML |
HTML 檔案格式 |
| xlCSV |
逗號分隔值檔案格式 (CSV) |
| xlText |
定位鍵分隔值檔案格式 (TSV) |
| xlUnicodeCSV |
逗號分隔 Unicode 值檔案格式 (CSV) |
| xlUnicodeText |
定位鍵分隔 Unicode 值檔案格式 (TSV) |
範例
此範例將工作表一 A1:F100 儲存格儲存至 CSV 檔案
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.csv', xlCSV);
此範例將工作表一 A1:F100 儲存格儲存至 HTML 檔案
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.html', xlHTML);
此範例將工作表一 A1:F100 儲存格儲存至 TSV(定位鍵分隔值)檔案
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlText);
此範例將整張工作表儲存為 sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlCSV);
此範例將整張工作表儲存為 Unicode sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlUnicode CSV);
此範例將工作表一 A1:F100 儲存格儲存至 Unicode TSV(定位鍵分隔值)檔案
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlUnicodeText);