Microsoft Access VBA单击Intranet网站上的按钮

Question

我已经在此代码上停留了大约一个星期。我有一个访问表，完成后会将用户带到我们Intranet网站上的参考声明编号。在该站点上时，我想完成一个步骤，即转到文件注释部分，用户可以在其中粘贴其信息。下面是我的代码。

Private Sub Command21_Click()
Dim appIE As InternetExplorerMedium
'Set appIE = Nothing
Dim objElement As Object
Dim objCollection As Object

Set appIE = New InternetExplorerMedium
sURL = "Intranet" & [claim]
With appIE
.Navigate sURL
.Visible = True
End With

While appIE.ReadyState <> 4
    DoEvents
Wend

Set ele = appIE.Document.getElementById("btnFileNotes_unselected")
ele.Click


Set appIE = Nothing

End Sub

我得到

  

运行时错误：91

在ele.click上

。任何帮助将非常感激。

谢谢。