** [[OOobbs2/173]] [#oc8458eb]
-''サマリ'': 特定のＵＲＬをＩＥで開き、画面を最前列にする方法
-''環境'': Calc
-''状態'': 未解決
-''投稿者'': [[ロバート・ジョン]]
-''投稿日'': 2009-04-21 (火) 23:14:12
*** 質問 [#z1cbc001]
ExcelのVBAにて「Google(http://www.google.co.jp/)をIEで開く」というマクロを設定していました。
そのマクロをVBASupportでCalcに移行して実行したところ、IEでGoogleを開くことができるのですが、
Excelと違うのは、IEがウィンドウの最前面に表示されません。
以下のコードに、OOOBASICで追記してウィンドウを最前面に設定することができますでしょうか？
よろしくおねがいします。
Rem Attribute VBA_ModuleType=VBADocumentModule
Option VBASupport 1
Sub Sample6()
Dim URL As String, IE As Object
Set IE = CreateObject("InternetExplorer.Application")
URL = "http://www.google.co.jp/"
With IE
.Navigate (URL)
.Visible = True
End With
End Sub
*** 回答 [#o398331d]
- Sub IE1 Shell("C:\Program Files\Internet Explorer\iexplore.exe",1,"http://www.google.com" End Sub -- new_OOo3 &new{2009-04-24 (金) 00:11:33};
- Sub IE1 -- new_OOo3 &new{2009-04-24 (金) 00:12:31};
- 読みにくいですが、shell文1行でご希望の事は出来ると思います。 -- new_OOo3 &new{2009-04-24 (金) 00:13:44};
#comment
*** 感想，コメント，メモ [#t1d877a4]
#comment
