Excel VBA 質問スレ Part70

[874 デフォルトの名無しさん (ﾜｯﾁｮｲ efba-u+PU) 2021/05/16(日) 15:00:47.34 ID:fN3wEca+0]

Sub Func()
Dim objIE As InternetExplorer
Set objIE = New InternetExplorer
objIE.Visible = True
objIE.Navigate "https://www.aguse.jp/";
Do While objIE.Busy = True Or objIE.readyState < READYSTATE_COMPLETE
DoEvents
Loop
objIE.Document.getElementById("url").Value = "99.9.9.9"
objIE.Document.getElementsByClassName("btn1").Click
End Sub
なぜ、クリック処理の所でエラー発生するのでしょうか？