EXCELファイルをPDFファイルに変換するコード。ファイル名の末尾(拡張子)を「.jse」にして保存して、右クリックメニューに登録しておくと便利かも。複数のEXCELファイルを選択して一括変更も可能です。
var file_count = WScript.Arguments.Count();
if (file_count == 0) {
WScript.echo("ファイルを選択して下さい");
WScript.quit();
}
var excel = WScript.CreateObject("Excel.Application");
excel.Visible = false;
excel.DisplayAlerts = false;
for (var i = 0; i < file_count; i ) {
convertToPDF(WScript.Arguments.item(i));
}
excel.Quit();
function convertToPDF(fname) {
var fname_PDF = fname.replace(/.xlsx/, ".pdf");
fname_PDF = fname_PDF.replace(/.xls/, ".pdf");
var workbook =
excel.Workbooks.Open(fname);
workbook.ExportAsFixedFormat(0, fname_PDF); // 0 is for PDF format
workbook.Close(false);
}