がIEエクスプローラ11に更新されました。Marcoアップデートが機能しません。

Question

IE11に更新しました。私のレポート（マクロ）を更新したところ、実行時にエラーが発生しました...実行時エラー'13 '：型が一致しません。私がデバッグするとき、以下が私をとりこにしている場所です - 具体的にSet pDocument = IE.document ...助けてください。ありがとうございます

Set IE = CreateObject("InternetExplorer.Application") 

    IE.navigate "https://famis.web.fedex.com/fwr/menus/menu-15-a.cfm?chgDiv=1&Division=09" 


With IE 
    .Top = 1 
    .Left = 1 
    .Height = 400 
    .Width = 600 
End With 

IE.Visible = True 

    Do While IE.Busy 
    Loop 


    Dim pDocument As IHTMLDocument2 
    Dim pElements As IHTMLElementCollection 
    Dim pElement As IHTMLElement 
    Set pDocument = IE.document 
    Set pElements = pDocument.all 

Worksheets("Setup").Range("A10").Value = IE.LocationName 



If IE.LocationName = "SSO Login" Then 

Answer 1

参照：Microsoft HTML Object Libraryがチェックされていることを確認してください。

VBAエディタの[ツール/参照]に移動できます。