• ベストアンサー

EXCEL・VBAでIEコピー

またお世話になります。 EXCEL・VBAのみの命令で 既に起動しているIEをアクティブにして 表示されている内容をコピーすることは 可能でしょうか。 なにとぞよろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • marbin
  • ベストアンサー率27% (636/2290)
回答No.3

#2です。 VBSからVBAに転用するときは、下記の部分は書き換えてください。 Wscript.Echo ↓ MsgBox Wscript.Quit ↓ Exit Sub

dumbodumbo
質問者

お礼

いつもありがとうございます。 複数IEが開いている場合は最初のIEが全コピーされるのですね。 それも、最小化されていても無条件コピー。 マクロで動かすとAppActivateがなぜか完璧に働かなくて困ってたので 助かります。 当面はこれでいけそうです。 あとは、APIを組み合わせてがんばってみます。 ありがとうございました。またよろしくお願いします。

その他の回答 (2)

  • marbin
  • ベストアンサー率27% (636/2290)
回答No.2

VBSですが、ほとんどそのままVBAに転用できると思います。 vbsでIEページコピーの方法 http://security.okwave.jp/qa4333225.html

  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.1

関連するQ&A

  • Excel2003VBAからIE64bitを制御

    Excel2003 VBAから、 CreateObject("InternetExplorer.application")でIEを起動できますが、 XP64bitの場合、IE32bitが起動します。 XP64bitには、IEが32bit版と64bit版が入っています。 Excel2003 VBAから、IE64bitを起動できるのでしょうか? Excel2003 VBAのVB6.0は32bitなので、 そもそも64bitソフトを制御できないものなのでしょうか? IE64bitを起動させるだけなら、Shellとフルパスでできますが、 objIEにオブジェクトとして格納できないので、制御ができません。 ヒントでも構いませんので、ご教授いただけると幸いです。

  • エクセルVBAにてコピー

    エクセルにて、VBAで、 あるフォーマットをコピーするようなものを作りたいのですが・・・。 例えば1~10行目までをコピーしたいとします。 その内容を1行空けて、12行目に貼り付ける。 次に、23行目に貼り付ける・・・というふうにして VBAにてまだ貼り付けられていない行に 貼り付けられるようにしたいのですが、できるでしょうか? よろしくお願いします。

  • VBAでIEのメニューバーを使用・操作したい。

    VBAでIEのメニューバーを使用・操作したい。 お世話になります。 現在VBAでIEを起動・操作しようとしています。 そこで下記を教えて頂きたいのです。 IEのメニューバーにある (1)編集→全て選択 (2)編集→コピー を実行したいのですが、 VBAからどのように入力すれば、(1)、(2)ができるのでしょうか? 以上お手数ですがよろしくお願いします。

  • Excel VBA IEの終了方法は?

    お世話になっています。 検索しましたが判らなかったので質問します。 VBAでIEを起動します。 Sub IE起動() Set IE = CreateObject("internetExplorer.application") IE.Visible = True IE.navigate ("http://www.goo.ne.jp") End Sub ここまでは出来ました。 --<質問内容>------ では、IEを終了するには?

  • VBAでHPをエクセルシートへコピーしたい

    現在、IEであるHPを表示し、IEですべて選択しコピー、 エクセルのシートへ貼り付けを行っております。 (ただ単にコピペし、レイアウトはエクセルにお任せです) この作業をVBAで自動化したいと思っております。 objIEを使ってやると思っているのですが、ソースを参照する方法等は探せましたが、ただ単にコピペする方法が分かりません。 このような事は、可能でしょうか? アドバイスをお願いします!

  • VBAでIEを操作したいです。

    VBAでIEを操作したいです。 エクセルでデータ管理をしております。 VBA・マクロ等を使用して、ウェブページの入力フォームに自動で入力、ウェブページの結果を再度エクセルに返すことはできますでしょうか? こちらがサイトになります。 モノレート http://mnrate.com/ こちらのサイトはアマゾンの商品の年間の価格推移を調べることができます。 ここに商品の「JANコード」(13ケタの商品ごとについているバーコード)を入力して、「グラフを見る」というボタンを押すと表示されます。 例えば、「Smap!Tour!2002! [DVD] 」という商品が知りたいとします。 その場合「4988002446582」(DVDの商品コード)を入力して「グラフを見る」を押します。 その後、ページが切り替わって切り餅のページが表示されると思います。 表示されたページの商品写真の横にあるASIN:「B00008GEUD」 という数字と、表示されたアドレス「http://mnrate.com/item/aid/B00008GEUD」をエクセルに返したいです。 話を整理させていただきます。 現在エクセルでは、A1セル~A100セルに「JANコード」(13ケタの商品ごとについているバーコード)が入力されております。 そこで「マクロ実行」をします。 そうすると、自動でIEが起動してB1セル~B100セルに「ASINコード」(例:B00008GEUD)、C1セル~C100セルに「ハイパーリンク」(例:http://mnrate.com/item/aid/B00008GEUD) ※エクセルから直接ジャンプできるように青色になったもの を自動で入力。 すべて完了後、IEが閉じてその後MSGで「完了しました」と表示される。 「入門者のExcel VBA」という本と、「EXCEL VBAでIEを思いのままに操作できるプログラミング術」という本を買って、一通り読み切ったのですが難しくて困っております。 分かる方おられましたら宜しくお願い致します。 最初だけしかわかりませんでした。 'IEの起動 Set ie=CreateObject("InternetExplorer.Application") ie.Visible=True 'URLへジャンプ ie.Navigate "http://mnrate.com/"

  • VBAで既に開いているIEをアクティブにするには

    質問しつれいします。 三流君のサイトをみながら、エクセルのVBAで、IEを開き証券口座にログインするプログラムを作りました。 一つのプログラムでIEを起動して、注文実行まではできるのですが、既に開いている(口座にログインしている)IEをアクティブにしてそこから注文する方法がわからず困っています。 相場が開いている間、シグナルが出た場合、すぐにIEをアクティブにして、注文を入力するプログラムをつくりたいと思っています。 既に開いてるIE(口座にログインしている)を選択し、objIE.navigate "" 'で指定のページに移動できるようにするにはどうしたらいいでしょうか?

  • VBAでIEが起動しているかどうかの確認

    VBAでIEが起動しているかどうかを確認するにはどういうコードを使えばいいのですか? 【やりたいこと】 (1)IEが起動しているか確認 (2)起動していたら、そのまま作業開始 (3)起動していなかったら、IEを起動させてから作業開始」 作業内容はもう完成しているのですが、あとはIEが起動している場合と、そうでない場合に分けるだけなのですが…

  • VBAでのコピーについてです。

     いつもお世話になっております。VBA初心者です。  シート全体の内容(データ)を別ブックのシートにコピーしたいのです。しかも、別ブックのシートにはデータがあるので、そのデータ下の行(例えば(20,A))から貼り付けたいのです。  いろいろと調べたのですが、やり方がわかりません。 よろしくお願いいたします。

  • VBAでIEを操作したいです。

    エクセルでデータ管理をしております。 VBA・マクロ等を使用して、ウェブページの入力フォームに自動で入力、ウェブページの結果を再度エクセルに返すことはできますでしょうか? こちらがサイトになります。 モノレート http://mnrate.com/ こちらのサイトはアマゾンの商品の年間の価格推移を調べることができます。 ここに商品の「JANコード」(13ケタの商品ごとについているバーコード)を入力して、「グラフを見る」というボタンを押すと表示されます。 例えば、「越後製菓 生一番 切り餅 1kg 」という商品が知りたいとします。 その場合「4901075022569」(切り餅の商品コード)を入力して「グラフを見る」を押します。 その後、ページが切り替わって切り餅のページが表示されると思います。 表示されたページの商品写真の横にあるASIN:「B00305HGSG」 という数字と、表示されたアドレス「http://mnrate.com/item/aid/B00305HGSG」をエクセルに返したいです。 話を整理させていただきます。 現在エクセルでは、A1セル~A100セルに「JANコード」(13ケタの商品ごとについているバーコード)が入力されております。 そこで「マクロ実行」をします。 そうすると、自動でIEが起動してB1セル~B100セルに「ASINコード」(例:B00305HGSG)、C1セル~C100セルに「ハイパーリンク」(例:http://mnrate.com/item/aid/B00305HGSG) ※エクセルから直接ジャンプできるように青色になったもの を自動で入力。 すべて完了後、IEが閉じてその後MSGで「完了しました」と表示される。 「入門者のExcel VBA」という本と、「EXCEL VBAでIEを思いのままに操作できるプログラミング術」という本を買って、一通り読み切ったのですが難しくて困っております。 分かる方おられましたら宜しくお願い致します。 最初だけしかわかりませんでした。 'IEの起動 Set ie=CreateObject("InternetExplorer.Application") ie.Visible=True 'URLへジャンプ ie.Navigate "http://mnrate.com/"

専門家に質問してみよう