WebブラウザからExcelを実行して終了させるには

質問

Webブラウザ(InternetExplorer)からExcelを実行し、VBAでExcelを終了させてWebブラウザに戻るにはどうすればできるのでしょうか？
Applicatio.QuitではExcelを終了できなくて困っています。

回答No.1

imogasi

＞InternetExplorer)からExcelを実行し
ＩＥの中から、エクセルを実行することは出きるのですか？。
下記はＶＢが起動で、ＩＥそしてエクセルを動かす、（良く載っている例ですが）下記の例では駄目なんでしょうか。
テストするには
"c:\My Documents\aaa14.xls"
を、自分の環境の存在するブックのフルパス名で置換えてください。
Private Sub Form_Load()
Dim bk As Object
Dim exl As Object
URLx = "http://ssx336.hp.infoseek.co.jp/VBteq.html"
Dim IE As Object
Set IE = CreateObject("InternetExplorer.application")
IE.FullScreen = False '標準化
IE.ToolBar = True 'ToolBar On/Off
IE.MenuBar = True 'MenuBar On/Off
IE.navigate URLx
IE.Visible = True
Set IE = Nothing
'-----
Set exl = CreateObject("Excel.application")
exl.workbooks.open "c:\My Documents\aaa14.xls"
exl.Visible = True
Set bk = exl.activeworkbook
Set sh1 = bk.worksheets("sheet1")
sh1.cells(2, "b") = "sdffff"
bk.Close
Set exl = Nothing
End Sub

お礼

ありがとうございました。
ExcelのVBA（マクロ）からブックを閉じてExcel終了としたかったのですが、無理なんでしょうね．．．。