実行時エラー '424'：Object Required IE.Document.GetElementById iframe内のテキストボックス

Question

IE.document.getElementbyIDを使用してIEの検索ボックスにテキストを読み込む際に問題があります。これまで使用していたコードを含めています。私はここで何かを逃していると確信しています。これは、あなたがキャッチしようとしているオブジェクトが"data-automation-id"属性を持つ、ID属性を持っていない私はここに

<iframe tabindex="-1" id="WorkdayApp" src="javascript:""" style="left: -1000px; top: -1000px; width: 0px; height: 0px; border-top-color: currentColor; border-right-color: currentColor; border-bottom-color: currentColor; border-left-color: currentColor; border-top-width: medium; border-right-width: medium; border-bottom-width: medium; border-left-width: medium; border-top-style: none; border-right-style: none; border-bottom-style: none; border-left-style: none; position: absolute;"> 

<input class="gwt-TextBox GPNS02MDDGJ" aria-label="Expanded, multiSelectPrompt, 0 items selected, Use up and down arrows to select. or Type in a search" type="text" placeholder="search" data-automation-id="searchBox"/> 

含めていますインラインフレームコード」

Sub workdayrep() 

'******************************* 
Dim iframe As Object 
Dim textbox As Object 
'******************************* 
Dim IE As InternetExplorer 
Set IE = New InternetExplorer 
Set iframe = IE.document.getElementById("WorkdayApp") 
Set textbox = iframe.contentWindow.document.getElementById("searchBox") 
IE.Visible = True 


IE.navigate "https://wd.workday.com/142.htmld" 

Application.StatusBar = "Page Loading" 

'Do While IE.Busy 
' Application.Wait DateAdd("s", 1, Now) 
' Loop 
Application.Wait Now + TimeValue("00:00:10") 
textbox.Value = "TEST" 

' Application.StatusBar = "Check" 
End Sub 

Answer 1

の更新です。

そのID、そこに明らかにして他のいくつかの要素がある場合を除きこのよう

<input class="gwt-TextBox GPNS02MDDGJ" aria-label="Expanded, multiSelectPrompt, 0 items selected, Use up and down arrows to select. or Type in a search" type="text" placeholder="search" data-automation-id="searchBox"/> 

、getElementByIDは常に（Nothingを返します。この場合はそうではありません！）。 getElementsByClassName("gwt-TextBox GPNS02MDDGJ")を超えるブルートフォースループが必要です。この（未テスト）のようなもの：

Dim itm 
For each itm in iFrame.contentWindow.document.getElementsByClassName("gwt-TextBox GPNS02MDDGJ") 
    If itm.getAttribute("data-automation-id", 2) = "searchBox" Then 
     itm.setAttribte("data-automation-id", "test") 
     Exit For 
    End If 
Next