1

簡単な質問になることを願っています。Web ページをロードして IE のフィールドに数値を入力するコードが少しあります。それは次のとおりです。

Option Explicit

Private Sub GettingCashAvail()

Dim IE          As InternetExplorerMedium
Dim HTMLDoc     As HTMLDocument
Dim IEField     As HTMLInputElement

Set IE = New InternetExplorerMedium

IE.navigate "https://website.com/login.aspx"

While IE.Busy
    DoEvents
Wend

Do Until IE.statusText = "Done"
    DoEvents
Loop

Set HTMLDoc = IE.document

Set IEField = HTMLDoc.getElementById("ucGetAccountNumber_txtAccountNumber")

IEField.Value = "#########"

現在、このフィールドは Enter キーを押して次のページに移動することをサポートしています。送信ボタンの 2 番目のオブジェクトを暗くしてから、IESubmit.Click のような操作を実行して情報を入力し、新しい画面に移動することもできますが、どうにかしてリターン キーを送信したいと考えています。以下は、私が興味を持っている Web ページのソースの一部です。

onkeypress="return clickButton(event,'ucGetAccountNumber_btnSubmit')"

単純にエンターキーを送信する方法はあると思いますか? そうでない場合は、その送信ボタンを2番目の入力オブジェクトに設定できます。

4

1 に答える 1