var fs = new FileSystem(FileSystem.PRIVATE_ROOT);
/* ★シートを追記するExcelファイルを選択★ */
var f = fs.OpenDialog("追記したいxlsを選択してください",
"Excelファイル(*.xls)=*.xlsx", "xlsx","sample1.xlsx");
var tempdata = f.ReadBinary();
/* ★シートを追記してエクスポートするExcelファイルを選択★ */
var newfile = fs.SaveDialog("保存するファイル名を指定してください",
"Excelファイル(*.xlsx)=*.xlsx", "xlsx", "sample2.xlsx");
try{
f.seek(0);
/* ★既存Excelファイルにシートを追記し、
「sample2.xls」としてエクスポート★ */
^.SSpread2.SaveExcel2007File(newfile, "",
$SS_EXCELSAVEFLAG_NOFORMULAS, "シート2",f);
}catch( ex ) {
if(ex.code == 24){
newfile.Write(tempdata);
}
//.MessageBox("同名でシート追加することは出来ません。
\r別名ファイルを指定してください");
}
newfile.close();
f.close(); |