Método SaveAs
Salva os valores do intervalo em um arquivo ou fluxo. Retorna 1 em caso de êxito
Sintaxe
function SaveAs(FileName: WideString; FileFormat: TXLSFileFormat): Integer;
function SaveAs(Stream: TStream; FileFormat: TXLSFileFormat): Integer;
| FileName |
WideString. Uma string que indica o nome do arquivo a ser salvo. Você pode incluir um caminho completo; se não incluir, o componente salva o arquivo na pasta atual |
| FileFormat |
TXLSFileFormat. Um valor que indica o formato do arquivo a ser salvo |
| Stream |
TStream. Saves para stream especificado no Stream parameter |
Descrição
FileFormat pode ser uma dessas constantes TXLSFileFormat
| xlHTML |
Formato de arquivo HTML |
| xlCSV |
Formato de arquivo de valores separados por vírgula (CSV) |
| xlText |
Formato de arquivo de valores separados por tabulação (TSV) |
| xlUnicodeCSV |
Formato de arquivo de valores unicode separados por vírgula (CSV) |
| xlUnicodeText |
Formato de arquivo de valores unicode separados por tabulação (TSV) |
Exemplo
Este exemplo salva as células A1:F100 na planilha um em arquivo CSV
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.csv', xlCSV);
Este exemplo salva as células A1:F100 na planilha um em arquivo HTML
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.html', xlHTML);
Este exemplo salva as células A1:F100 na planilha um em arquivo TSV (Tab Separated Values)
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlText);
Este exemplo salva toda a Planilha como sheet.csv
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlCSV);
Este exemplo salva toda a Planilha como sheet.csv unicode
Workbook.Sheets[1].UsedRange.SaveAs('sheet.csv', xlUnicode CSV);
Este exemplo salva as células A1:F100 na planilha um em arquivo TSV unicode (Tab Separated Values)
Workbook.Sheets[1].Range['A1', 'F100'].SaveAs('expdata.tsv', xlUnicodeText);