VB　webデータの取得

締切済

質問者：Ashgin
質問日時：2012/12/28 09:51
回答数：1件

web（気象データ)を取得するプログラムを以前マクロで組んでいたのですが，これを今回諸事情によりVB2010で再構築していますが，どうすればいいか悩んでいます．
以下はマクロプログラムです．
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.data.jma.go.jp/obd/stats/etrn/view/ho … & AD2 & "&year=" & y & "&month=" & m & "&day=" & d & "&view=" , Destination:=Range("D" & R))

.RefreshStyle = xlOverwriteCells
.AdjustColumnWidth = False
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "10" '時々変更あり、最近は19
.Refresh BackgroundQuery:=False
End With

これを，どなたかVB版に変換して頂けませんでしょうか?
取得したデータはデータソースに格納する

よろしくお願いいたします．

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (1件)

最新から表示
回答順に表示

No.1

回答者： web2525
回答日時：2012/12/28 10:33

http://hanatyan.sakura.ne.jp/patio/read.cgi?no=318

やりたいことは、上記サイトのまんまですよね

webクエリはExcelの機能なので、Excel上での実行が必要です

Excelで
日付データの取り込み⇒webクエリ実行⇒取り込んだデータを成形しファイル保存⇒Excel終了
の自動実行マクロ作成してVB上から呼び出して、保存されたファイルデータを再処理する方が、すべてVB上で処理するより修正が安易なような気がします