Office関連

IEを操作するVBAマクロ実行中にオートメーションエラーが発生する場合の対処法

下記コードのような、Internet Explorerを操作する簡単なマクロを実行したところ、ReadyStateプロパティの値を取得しようとした時点でシステム エラーやオートメーション エラーが発生しました。

Public Sub Sample()
  Const READYSTATE_COMPLETE = 4
  
  With CreateObject("InternetExplorer.Application")
    .Visible = True
    .Navigate "https://ja.wikipedia.org/wiki/"
    Do While (.Busy = True) Or (.ReadyState <> READYSTATE_COMPLETE)
      Sleep 100
    Loop
    Stop
  End With
End Sub

システム エラーです: &H80010108 (-2147417848) 起動されたオブジェクトはクライアントから切断されました。

実行時エラー ‘-2147417848 (80010108)’:

オートメーション エラーです。
起動されたオブジェクトはクライアントから切断されました。

インターネットオプションを確認したところ、“目的のURLが「信頼済みサイト」に登録されていたことが原因”で、外したらすぐにエラーが発生しなくなりました。

何年か前にも同じことが原因で引っ掛かったことがありましたが、すっかり忘れていました・・・。
これからは忘れないように、対応策をメモしておきます。

関連Webページ

上記関連Webページを見る限り、「信頼済みサイト」の設定でも上手くいかない場合は、

  1. 「管理者権限」で実行する。
  2. 「保護モードを有効にする」をオン・オフする。

といった方法も試すと良さそうです。

【2017年7月版】ポータブル デバイスからファイルをコピーするVBAマクロ前のページ

Presentation Translatorが公開されました。次のページ

関連記事

  1. Office関連

    「クイックアクセスツールバーからPowerPointマクロを実行するアドイン」のコード

    2年ほど前に書いたPowerPointマクロの記事「クイックアクセスツ…

  2. Office関連

    PHPWordを使ってPHPからWordファイルを出力してみる。

    最近オトカドールやルミティアジュエルやらの記事ばかり書いていますが、今…

  3. Office アドイン

    [Office用アプリ]サポートページにある資料へのリンクをまとめてみました。

    MicrosoftのサポートページにあるOffice 用アプリや関連技…

  4. Office関連

    [Excel Services ECMAScript]ActiveWorkbookのシート数を取得す…

    埋め込んだExcelワークブックのシート数を取得するコードです。 …

  5. Office関連

    ページ毎に処理を行うWordマクロ

    Wordのマクロで「ページ毎に○○したい」という要望があったので、簡単…

コメント

  • コメント (0)

  • トラックバックは利用できません。

  1. この記事へのコメントはありません。

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP