<html><head><title>タイトル</title> <script language=vbscript> Sub window_onload() Set Excel=CreateObject("Excel.Application") hwnd=Excel.ExecuteExcel4Macro("CALL(""user32"",""FindWindowA"",""JJC"",0,""タイトル"")") Excel.ExecuteExcel4Macro("CALL(""user32"",""SetWindowPos"",""JJJJJJJJ""," & hwnd & ",-1,0,0,0,0,3)") End Sub </script></head></html>