還記得剛開始的時候
有分享過一篇「WSH研習記錄--案例：OpenIE小嘗試」
這是用來開啟IE應用程式的
當然除了IE應用程式之外，OFFICE的應用程式也是可以用同樣的方式來啟動的..
一、啟動Excel
在VBScript之中，可使用Active X自動化技術來自由地操作Excel
只需使用CreateObject物件來指定Excel.Application物件產生
範例：

With CreateObject("Excel.Application")
	.Visible = True
	.Workbooks.Add
End With

跟之前開啟IE應用程式的方式很像吧..

二、開啟活頁簿(Open方法)
開啟已存在活頁簿的方式可使用Excel.Workbooks物件的Open方法來開啟
範例：

Option Explicit

Private BookPath

With CreateObject("Scripting.FileSystemObject")
	BookPath = .BuildPath _
		(.GetParentFolderName(WScript.ScriptFullName) _
		, "001.xls")
End With

With CreateObject("Excel.Application")
	.Visible = True
	.Workbooks.Open BookPath
End With

事先製作一份Execl檔案--001.xls
將檔案放在跟程式檔存在的同一個資料夾裡
執行後，它將會幫你開啟001.xls檔

三、關閉活頁簿(Close方法)
即然可以開啟活頁簿，當然也是可以關閉活頁簿
使用Excel.Workbooks物件的Close方法來關閉活頁簿
範例：

Option Explicit

Private Book

With CreateObject("Excel.Application")
	.Visible = True
	Set Book = .Workbooks.Add
	Book.ActiveSheet.Range("A1").Value = "Good !!"
	MsgBox "準備關閉已製作的活頁簿!!"
	Book.Close False
End With
Set Book = Nothing

在程式中，先利用CreateObject物件啟動Excel應用程式
在活頁簿的「A1」儲存格裡填入「Good !!」
再將這個活頁簿關閉
但是它並不會將Excel應用程式給關閉..

提供給有需要的人..