エクセル VBAを使い一定時間毎に webページの情報をセルに所得し続
- エクセル VBAを使い一定時間毎に webページの情報をセルに所得し続けていました。ある日、パソコンの調子が悪くなり新しいパソコンに変え 同じことをしようとしたのですが、webページが真っ白のまま何の要求も受け付けない状態になり、エラーが表示されました。
- 旧パソコンでは問題なく動作していた環境でしたが、新パソコンに変えた際にエラーが発生しました。VBAの中身は変更していないため、IEのバージョンの違いやエクセルのバージョンの違いが原因ではないかと考えています。
- 原因や可能性について教えていただけると助かります。
- ベストアンサー
エクセル VBAを使い一定時間毎に webページの情報をセルに所得し続
エクセル VBAを使い一定時間毎に webページの情報をセルに所得し続けていました ある日 パソコンの調子が悪くなり新しいパソコンに変え 同じことをしようとしたのですが 何度か処理した段階で（時間、回数ともに不定期） webページが真っ白のまま何の要求も受け付けない状態になり 下記エラーがでて固まってしまいます -------------------------------------- 実行時エラー -2147417856（80010100）: オートメーション エラーです。 システムコールに失敗しました。 -------------------------------------- 旧から新に変える際、VBAの中身は一切いじってません 旧パソコン ・IE6 ・エクセル2000 新パソコン ・IE7 ・エクセル2007 IE または エクセルの バージョン違いのせいではないかと思うのですが原因を特定できません 考えられる原因、可能性でも結構ですのでお教えいただけたら幸いです 宜しくお願いいたします
- r576135768
- お礼率56% (13/23)
- その他MS Office製品
- 回答数1
- ありがとう数2
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
>新パソコン >・IE7 >・エクセル2007 それと、Windows のバージョンが、Vista になったのでしょうね。 そうすると、IE7のセキュリティが働いて、動きません。 ただ、オートメーション自体のエラーは、一度、コードをみて、Dim objIE As ○○○○ というように、IEオブジェクトで、参照設定で、As InternetExplorer.Application とでもなっていて、メニューの中で、ツール--参照設定の中を調べてみてください。×とかなっていないでしょうか。そうしたら、再度、登録しなおしてください。(名称は、Microsoft Internet Control)ただし、パスワードが出てきたら、製作者にお尋ねになったほうがよいです。 他に、新しいIE+Vistaの場合は、セキュリティモードの問題があります。 一時しのぎには、「インターネットゾーンの保護モードを解除」で良いのですが、いちいち、余計なメッセージが出ているので、あまり気持ちのよいものではありません。 IE7-- ツール--オプション--セキュリティ--保護モードを有効にする。 のチェックを外します。 その場合は、同じく「セキュリティ」の「信頼済みサイト」を選択して、サイトで、URLを登録すればよいのではないかと思います。
関連するQ&A
- VBAでWebページにセルの値を入力
エクセルＶＢＡを用いて指定したセルの値を 表示中のWebページにあるテキストエリア等(よくある入力フォーム)に入力する というものを作りたいのですが、 IEとの連携がよくわかりません。 似たようなもので、googleページを自動で開き、 テキストエリアに検索語句を入力し、ボタンを押す というもののソースがありました。 下記のページの３番です。 http://www.hatena.ne.jp/1137216805 これを応用できるかなと思ったのですが、 うまくいきません。 ・表示中のページに入力したいので ie.Navigate ("http://www.google.co.jp/") この部分が必要ありません。 呼び出したページではなく、表示中のページを ie.document.allの対象にするにはどうすればよいのでしょうか？ また、他にも良いやり方がありましたら、教えてください。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- VBA ；Book1を開く→一定時間がきたらお知らせ
エクセルＶＢＡのあるＢＯＯＫ１を開き、ある一定時間（例えば１０分経過時）がきたら、ポップアップでお知らせすることができる、式ってありますか？
- ベストアンサー
- Visual Basic
- ＷＥＢページでＶＢＡを使う事
新規にブックを立ち上げて、 アクティブXコントロールのコマンドボタンを置いて、 Private Sub CommandButton1_Click() MsgBox "test" End Sub として、 ファイル名：Book1.htm ファイルの種類：webページ にして、一度ファイルを閉じて、Book1.htmをダブルクリックして開くと ＩＥのブラウザで開かれコマンドボタンが表示されますが押してもmsgboxは表示されません。 ＷＥＢページでＶＢＡを使う事は無理なのでしょうか？ ＶＢＳやjavaスクリプトに書き換えなくてはいけないですか？ エクセルで作ったデータベースをそのままＷＥＢにアップしたいのでこのような事が知りたいです。
- ベストアンサー
- その他MS Office製品
- WEBページからのメッセージをVBAで
いつもお世話になっております。 エクセルVBAでIE制御についてです。 環境はWIN7、IE 9or11とエクセル2010です。 あるページのリンクをクリックすると、 WEBからのメッセージというダイアログボックスが出てきて、 続行しますか？ はい いいえ を聞かれます。 その「はい」をVBAで押したいのですが、 sendkeysメソッドで押そうとしてもうまくいきません。 以下に記載したサイトのOKボタンを押すと出てくるものです。 http://kamicha1.web.fc2.com/Excel/Test20090726.html 以下が書いたコードです。 Declare Sub Sleep Lib "KERNEL32" (ByVal dwMilliseconds As Long) Sub test() Dim ie As Object Set ie = CreateObject("InternetExplorer.Application") ie.Visible = True ie.navigate "http://kamicha1.web.fc2.com/Excel/Test20090726.html" Do While ie.Busy Or ie.readyState < 4 DoEvents Loop ie.document.getElementsByClassName("bt2")(0).Click '-ここで止まる Sleep 2000 SendKeys "{Enter}" End Sub ステップ実行していくと、ここで止まると書いた所で、 IE上にダイアログは表示されるのですが、 それ以上ステップ実行ができなくなってしまいます。 ダイアログを自分でOKかキャンセルで消すと続きが動くようになります。 その間はVBEはビジー状態となり操作できません。 そのためそれ以降のsendkeysメソッドに たどり着けない状況かと思われます。 いろいろ調べたところIE8以降はダイアログボックスは IEから出ているのではなくOS？から出ているとの事でした。 上記のサイトはHTML本体にjavaスクリプトが記載されており、 それをVBAから操作すればどうにかOKボタンが押せるらしいのですが、 自分が操作したいページにはそれらしき記載がありませんでした。 対象のアンカータグは <a herl=URL 中略 data-comfirm=続行しますか？ ＞ のような感じで記載がありました。 完全に煮詰まっております。 自動でOKをクリックするかEnterキーでOKを押すでも構いません。 どうかご教授お願いいたします。
- ベストアンサー
- Visual Basic
- WEBページが表示できない
こんにちは。 オフィスに二台のパソコンがあるのですが、 一台のパソコンで一定のWebページだけが 表示できません。 (1)パソコンは両方Windows NTです。 (2)余り詳しくないのですが、設定などに大差はないと 思います。 (3)表示したいWebページのアドレスは 「https」で始まります。 (4)表示したいWebページは一般用のWebページではなく、業者専用のWebページです。 これらの特徴で、考えられる原因があれば 教えてください。 よろしくお願いします。
- ベストアンサー
- その他（インターネット接続・通信）
- エクセルVBA WEBからデータ取得 文字化け
社内の業務管理システムにエクセルＶＢＡでＩＥ経由のアクセスをして表のデータを取得し、エクセルのシートに転記したら文字化けします。原因として何が考えられますか？ アドバイスをお願いします。（UTF-8になってしまいます。） ●●●●備考●●●● ◆VBAのコード With ActiveSheet.QueryTables.Add(Connection:="url;http:***略***?no=112", Destination:=Range("a3")) .WebSelectionType = xlSpecifiedTables .WebFormatting = xlWebFormattingNone .WebTables = "1" .Refresh BackgroundQuery:=False .Delete End With ◆ウェブページはmetaタグでshift-JIS指定してあり、ＩＥでは正しく表示されます。 ◆他のshift-JISのウェブページ（例 http://www.tohoho-web.com/）なら文字化けせずデータ取得できます。
- 締切済み
- Visual Basic
- エクセルファイルをwebページとして保存した時
エクセル2003を使っています。 あるエクセルファイルにVBAを組んでいます。 このファイルをwebページとして保存して、html化にしてもこのVBAはブラウザ上で実行できるのでしょうか？ できる場合は、やり方も教えて下さい。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ウェブページエラー。助けてください・・・
サイト運営者です。自分の作ったサイトにVaioのIE8でアクセスすると、「Webページエラー」と表示されて、「このウェブページをデバッグしますか？」と出ます。 Firefox、GoogleChromeなどではエラーは出ませんが、IE8のみ出ます。IE7では出ないです。 これでは閲覧者がIE8を使っている場合、サイトが表示されません。 エラー箇所を一つずつ直して行くのがいいのでしょうけど、現在サイトに広告も入れてますし、 修正には膨大な時間がかかりそうなので、なんとか応急処置をしたいのですが、 閲覧者のIEがデバッグを立ち上げるのを止めるスクリプトなどないでしょうか？
- 締切済み
- HTML
- エクセルVBAでWEB上のリンクをクリック
エクセルVBAで、IEを開いて指定したURLをNavigateするところまではなんとかできたのですが、Navigateしたページ上の特定のリンクをクリックするにはどうしたらいいかがわかりません。 どなたか教えて頂けないでしょうか？ よろしくお願いします。
- 締切済み
- Visual Basic
お礼
返答が遅れすみませんでした 対処法まで教えていただきありがとうございました 初めての事態でしたのでとても助かります すぐに結果を出すことが出来ずもどかしいですが、ご指摘いただいたところを変更した後に動かしてみたいと思います