IE自動操作コード一覧（ExcelVBA / VBScript）

#前提条件
###ExcelVBA
参照設定をする。

• Microsoft HTML Object Library
• Microsoft Internet Controls
  ###VBScript
  特になし。

#コード

##IEを開く
InternetExplorerを開く。
###ExcelVBA

Dim ie As New InternetExplorer
ie.Visible = True

###VBScript

Dim ie 
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True

##IEを閉じる
InternetExplorerを閉じる。
###ExcelVBA / VBScript

ie.Quit
Set ie = Nothing

##待機する
プログラムを「%0」秒待機する。
###ExcelVBA

Dim ymdTo As Date
ymdTo = DateAdd("s", %0, Now)
While Now < ymdTo
   DoEvents
Wend

###VBScript

WScript.Sleep(%0 * 1000)

##IEを最大表示する
InternetExplorerを最大表示にする。
###ExcelVBA / VBScript

ie.FullScreen = True

##遷移する
URL「%0」のWebページを開く。
###ExcelVBA

ie.Navigate %0
Do While ie.Busy = True Or ie.readyState <> 4
    DoEvents
Loop

###VBScript

ie.Navigate %0
Do While ie.Busy = True Or ie.readyState <> 4
Loop

##要素を取得する（ID指定）
指定ID「%0」の要素を取得する。
###ExcelVBA

Dim elm as Object
Set elm = ie.document.getElementById( %0 )

###VBScript

Dim elm
Set elm = ie.document.getElementById( %0 )

##要素を取得する（Name指定）
指定Name「%0」の要素群を取得する。
###ExcelVBA

Dim elms As Variant
elms = ie.document.getElementsByName( %0 )

###VBScript

Dim elms
elms = ie.document.getElementsByName( %0 )

##要素を取得する（ClassName指定）
指定ClassName「%0」の要素群を取得する。
###ExcelVBA

Dim elms As Variant
elms = ie.document.getElementsByClassName( %0 )

###VBScript

Dim elms
elms = ie.document.getElementsByClassName( %0 )

##要素を取得する（TagName指定）
指定TagName「%0」の要素群を取得する。
###ExcelVBA

Dim elms As Variant
elms = ie.document.getElementsByTagName( %0 )

###VBScript

Dim elms
elms = ie.document.getElementsByTagName( %0 )

##要素にフォーカスを当てる
取得した要素にフォーカスを当てる。
###ExcelVBA / VBScript

elm.Focus

##要素に値を入力する
取得した要素に値を入力する。
###ExcelVBA / VBScript

elm.Value = "x"

##要素の候補を選択する
取得した要素の候補をインデックス「%0」で選択する
###ExcelVBA / VBScript

elm.selectedIndex = %0

##要素をクリックする
取得した要素をクリックする
###ExcelVBA / VBScript

elm.Click

#関連記事
##スクリーンショットを取る
###ExcelVBA
・ExcelVBAでスクリーンショットを取る方法 - Qiita
###VBScript
・【WSH】VBScriptでPrintscreen・Alt+Printscreenしてみた - くんすとの備忘録
##キー入力を再現する
###ExcelVBA
・Office TANAKA - Excel VBAステートメント[SendKeysステートメント]
###VBScript
・IEへのキー入力をVBScriptで再現する。 - Qiita