下記環境でインターネットオプションのセキュリティ設定で”インターネット”ゾーンのセキュリティレベルを「高」にした状態で下記Excel VBAを実行するとエラーになります。
インターネットゾーンのセキュリティレベルを「高」にしたままで下記コードを実行できるようにする方法はありますでしょうか?
よろしくお願いいたします。
【環境】
Windows 8.1 Pro Excel 2007 SP3 Internet Explorer 11
【Excel VBA】
Option Explicit Sub hoge() Dim objHtml As Object Dim elm As Object Set objHtml = CreateObject("htmlfile") Set elm = objHtml.createElement("span") elm.setAttribute "id", "result" objHtml.appendChild elm '↓ここで実行時エラー発生 objHtml.parentWindow.execScript "document.getElementById('result').innerText = 'hoge';", "JScript" MsgBox elm.innerText End Sub
●試してみたけど駄目だったこと
・このマクロが入ったxlsmファイルのファイル名を信頼済みサイトに登録
・このマクロが入ったxlsmファイルをサーバーの共有フォルダに置きそのサーバーのIPアドレスを信頼済みサイトに登録
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2017/06/13 20:12