VBAのIE(InternetExplorer)制御に便利なサブルーチンを紹介しています。
Sub tagClick(objIE As InternetExplorer, _
tagName As String, _
tagStr As String)
'タグをクリック
For Each objTag In objIE.document.getElementsByTagName(tagName)
If InStr(objTag.outerHTML, tagStr) > 0 Then
objTag.Click
Call ieCheck(objIE)
Exit For
End If
Next
End Sub
引数名 | データ型 | 内容 | 値の事例 | 初期値 | 省略 |
---|---|---|---|---|---|
objIE | InternetExplorer | IEオブジェクト | objIE,objIE2 | × | |
tagName | String | タグ要素の文字列 | "input","a","p" | × | |
tagStr | String | クリックする一意のキーワード文字列 | "送信","取り消し" | × |
「objIE」はオブジェクトを入力します。
「tagName」はタグ要素(input,a,tableなど)を入力します。
「tagStr」には、クリックする一意のキーワード文字列を入力します。