作成 2010.01.04
更新 2014.11.04
VBScript で Excel ファイルを開いたときの安全な終了方法
Save の直後に Quit を実行すると強制終了されたと解釈されるため、RESUME.XLW が作成される。
これを回避するには、ブックを閉じてからアプリケーションを終了させる。
strFullPath = "C:\test.xlsx"
Set xlApp = CreateObject("Excel.Application")
Set xlWorkbook = xlApp.Workbooks.Open(strFullPath)
Set xlSheet = xlWorkbook.Worksheets(1)
xlSheet.Cells(2,4).Value = "2,4"
xlWorkbook.Save
xlWorkbook.Close
xlApp.Quit
タグ: VBScript Excel

©2004-2017 UPKEN IPv4