以下のコードは、Google などのインターネット サイトを使用すると正常に動作します。ただし、仕事用のイントラネット サイトにアクセスする必要があります。実行時エラー '-2147023179 (800706b5)': Automation error The interface is unknown が表示されます。
Dim ie As Object
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.Navigate "INTRANET SITE"
Do While ie.Busy
DoEvents
Loop
ie.Quit
Set ie = Nothing
助けてください。ありがとう。
注: Excel が管理者として実行されている場合、これは正常に機能します。ただし、この 1 つのワークブックだけで Excel を管理者として実行することはできないと思います。