ホーム＞エクセルマクロ初心者講座＞マクロでWebデータを取得する
 |
| マクロとは マクロの自動記憶とは マクロの実行 ＶＢＡとは プロシージャの呼び出し マクロの登録 セルの参照 行・列の参照 セル・の編集 セルの値（数式）の設定 変数とは 制御構造とは（条件分岐） 制御構造とは（繰り返し処理） ワークシートの参照 ワークシートの編集 クエリでＷＥＢデータを取り込む マクロでウェブデータを取得する |
 |
マクロでWebデータを取得するまずは先ほどの「クエリでWebデータを取り込む」で行った操作を自動記録したものを見てみましょう。 
ΣΣ(￣◇￣;)げ！ めちゃくちゃ多いですね (ﾟ＿ﾟi)ﾀﾗｰ･ しかし、安心してください ダイジョウ（ v￣▽￣）ブイ マクロの自動記録は「余計な部分まで記録」してしまうのです。 実は、たったこれだけでいいんです。 ---------コピー＆ペースト（貼り付け）で利用できます-------- Sub クエリ抽出 () With ActiveSheet.QueryTables.Add(Connection:= _ "url;取得データがあるＵＲＬ", _ Destination:=取得したデータを挿入する箇所) .WebSelectionType = xlSpecifiedTables .WebFormatting = xlWebFormattingNone .WebTables = "取得データのテーブル番号" .Refresh BackgroundQuery:=False End With End Sub --------------------------------------------- では、さっそく実践に移りましょう。 まずはＶＢＥを開いてください。 
以下の画面が表示されましたね。 
「VBAProject」を右クリックしてください。 そして、以下の状態に移行してください。 
「標準モジュール」をクリックしてください。 以下のように右側に「ＶＢＡ」を入力するシートが表れましたね。 
では、さきほど上記で紹介した「ＶＢＡコード」をコピーして貼り付けてください。 
次に、「取得データがあるＵＲＬ」の箇所に以下のＵＲＬを貼り付けてください トヨタ自動車→http://charge.quote.yahoo.co.jp/q?s=7203.t&d=c&k=c3&z=m&h=on そして、「取得したデータを挿入する箇所」を「Range("A1")」に、「取得データのテーブル番号」を「14」に変更してください 
では、実際に今作ったマクロを実行してみましょう。 エクセルシートに戻って以下の状態に移行してください。 
「マクロ」をクリックしてください。 以下のテーブルが表れましたね。
「実行」をクリックしてください。 キタ----（ﾟ∀ﾟ）----!!!! 見事先ほどの「Webデータを取り込む」で行ったエクセル操作が実行されましたね これで「Webのデータを取得するマクロ」作成の基本は終わりました(￣∀￣)ｄ グゥッ！
ページTOPに戻る
|
ホーム＞エクセルマクロ初心者講座＞マクロでWebデータを取得する