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関連

    手軽に参照設定するためのVBAアドイン

    thom氏のブログで面白い記事がありました。・VBA 参照…

  2. Excel

    セル内の改行をカウントするExcelマクロ

    「Excel セルの内容 改行を数える VBA」といったキーワード検索…

  3. Office関連

    VBAプロジェクトを「展開する」VBAマクロ

    MSDNフォーラムに面白い質問がありました。VBE・プロジェクト …

  4. Office関連

    セルの行数をカウントするWordマクロ

    「ソースコードを番号行付きのテーブルに変換するWordマクロ」を実行し…

  5. アイコン一覧

    Office 2013 アイコン一覧(I)

    ・Office 2013 アイコン一覧 NUM…

  6. Excel

    フォルダ内にあるExcelファイルをカウントするVBScript

    「フォルダ内 Excel 数える VBScript」といったキーワード…

コメント

  • コメント (0)

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

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

Time limit is exhausted. Please reload CAPTCHA.

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

Translate

最近の記事

アーカイブ

PAGE TOP