VBAでフレーム内formクリックするためのサブルーチン「frameTagClick」

VBAのIE(InternetExplorer)制御に便利なサブルーチンを紹介しています。

「frameTagClickサブルーチン」の詳しい説明は以下よりご確認ください。
フレーム内フォームクリック
Sub frameTagClick(objIE As InternetExplorer, _
                  tagName As String, _
                  tagStr As String)

 'フレームのオブジェクトを取得する
 Set objFrame = objIE.document.frames

 For i = 0 To objFrame.Length - 1
 
  'フレームドキュメントのオブジェクトを取得する
  Set objFrameDoc = objFrame(i).document

  For Each objTag In objFrameDoc.getElementsByTagName(tagName)

   If InStr(objTag.outerHTML, tagStr) > 0 Then

    objTag.Click

    Call ieCheck(objIE)

    GoTo label01

 
   End If
  Next

 Next
    
label01:

End Sub
引数名データ型内容値の事例初期値省略
objIEInternetExplorerIEオブジェクトobjIE,objIE2×
tagNameStringタグ要素の文字列"input","a","p"×
tagStrStringクリックする一意のキーワード文字列"送信","取り消し"×
frameTagClick("IEオブジェクト","タグ要素の文字列","クリックする一意のキーワード文字列")

「objIE」はオブジェクトを入力します。
「tagName」はタグ要素(input,a,tableなど)を入力します。
「tagStr」には、クリックする一意のキーワード文字列を入力します。