SaveAs metode
Saves the range values in a file or stream. Returnerer 1 if it succeeds
Syntaks
function SaveAs(FileName: WideString; FileFormat: TXLSFileFormat): Integer;
function SaveAs(Stream: TStream; FileFormat: TXLSFileFormat): Integer;
| FileName |
WideString. En streng, der angiver navnet på den fil, der skal gemmes. Du kan angive en fuld sti; gør du det ikke, gemmer komponenten filen i den aktuelle mappe |
| FileFormat |
TXLSFileFormat. A value that indicates format of the file to be saved |
| Stream |
TStream. Saves to a stream specified in the Stream parameter |
Beskrivelse
FileFormat can be one of these TXLSFileFormat constants
| xlHTML |
HTML file format |
| xlCSV |
Comma separated values file format (CSV) |
| xlText |
Tab separated values file format (TSV) |
| xlUnicodeCSV |
Comma separated unicode values file format (CSV) |
| xlUnicodeText |
Tab separated unicode values file format (TSV) |
Eksempel
This example saves cells A1:F100 on sheet one to CSV file
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.csv', xlCSV);
This example saves cells A1:F100 on sheet one to HTML file
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.html', xlHTML);
Eksemplet gemmer cellerne A1:F100 på det første regneark i en TSV-fil (Tab Separated Values)
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlText);
This example saves the entire Worksheet as sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlCSV);
This example saves the entire Worksheet as unicode sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlUnicode CSV);
Eksemplet gemmer cellerne A1:F100 på det første regneark i en Unicode-TSV-fil (Tab Separated Values)
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlUnicodeText);