htnurbo https://blog.hatena.ne.jp/htnurbo/ htnurboの日記 https://htnurbo.hatenadiary.org/ sampleSub sample() '定数定義 Const IE_MAX = 4 Const NAV_OPEN_IN_NEW_TAB = &H800 Const NAV_OPEN_IN_BACKGROUND_TAB = &H1000 '変数定義 Dim objShell Dim objIE Dim count Dim ieList( 3 ) Dim i 'オブジェクト設定 Set objShell = CreateObject("Shell.Application") Set objIE = CreateObject("InternetExplorer.Application") 'IE起動… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fhtnurbo.hatenadiary.org%2Fentry%2F20130703" title="IE自動起動&amp;自動ログイン VBS - htnurboの日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2013-07-03 00:00:00 rich https://htnurbo.hatenadiary.org/entry/20130703 1.0 100%