VBScriptについて必死に話し合うスレ
http://toro.2ch.net/test/read.cgi/tech/1242136180/698
から誘導されてきました。

ExcelからJavaで作ったフォームを表示したいのですが、
java.swing.JFrameで作ったフォームを起動後、閉じるとExcelが最前面にきません。
Excel上のボタンを押す
->Javaの画面が最前面に起動
->Javaを終了するとExcelが最前面に戻ってくる
としたいのですが、なぜかExcelの上にその下にあったエクスプローラー等が表示されます。
ソースは下記です。実物が見れないので、一部間違ってる可能性はあります。

Sub Test_OnClick()
 On Error Goto EEXIT
 Application.Interactive = False
 Set Shell = CreateObject("WScript.Shell")
 Shell.Run "java -jar jframe.jar", True, True
EEXIT:
 Application.Interactive = True
End Sub

Excel 2010, Windows7です。
java側の問題かもしれませんが、宜しくお願い致します。